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ITATIONS, 
A TEACHER CAN UNLOCK IMAGINATIONS, 



By 1985, fully 75% of aU jobs 
will involve computers. So for 
todays teachers, selecting the 
right computer is an awesome 
responsibility It's a decision you 
can feel confident about with 
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Corporation's S + computer 
n The S + is specially 
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row and a teacher's today. Us 
built tough. It's simple to 
operate, You can teach without 
becoming a hardware specialist. 
The S + is fluent in a variety 
of languages: BASIC. PASCAL, 
COBOL. FORTRAN PILOT. 



FOBTH. "C and MUMPS and 
allows you simultaneous use in 
the classroom This flexibility 
enables you to use your own 
curriculum, not a machine's 
version. The system also allows 
for individual learning styles. 
Students go as fast and as 
far as the teacher chooses, 

Even though it's priced like 
a smaller personal computer. 
die S+ has the multi-task 
power and expansion abilities 
of a professional computer 
It can grow with you and 
your students, 

Tbmorrow is in your hands. 



today, Call Fisher Scientific 
exclusive distributor of our S 
system, and you" 11 get the key to 
unlock imaginations 

For more information. 
Call toll-free £00-6214769 
Illinois customers call collect 
(312)378*7770. 

Fisher Scientific 

An AillED Company 

Educational Materials Division 
4901 W LeMoyne ! 
Chicago. Illinois 60651 
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OS-9 NOW HAS THE LARGEST 
USER COMMUNITY 

More users now run OS-9 on their 
6809 computers than all other 
operating systems combined. This 
outstanding success story was no 
accident — it's due to OS-9's 
technical excellence backed up by 
outstanding Microware support. 
OS-9 T s Unix-type architecture and 
totally modular design gives your 
computer more power and versatility. 
OS-9 also gives you more 
possibilities for customization so you 
can tailor your system exactly to your 
needs. And aren't flexibility and 
performance the reasons you chose 
a 6809 computer to begin with? 




OS-9 HAS BEEN CHOSEN BY 
OVER SO 6809 SYSTEM 
MANUFACTURERS 

OS-9 is now offered as a standard 
operating system by almost every 
6809 system manufacturer and has 
been designed into an amazing 
variety of dedicated systems and 
products including personal and 
business computers, process control 
systems, data and telecommunica- 
tions systems, and more. In all, over 
50 companies and organizations have 



obtained OS-9 distribution licenses 
including such well-known names 
such as General Motors, NASA, 
Fujitsu, Western Electric, Motorola, 
Sykes Datatronics, Eastman Kodak, 
Thomson-CSR and Tandy Corp. 

OS-9 GIVES YOU A 
SOFTWARE BASE TO BUILD ON 

Whatever your application, OS-9 
speaks your language! Microware 
offers BASIC09, an Extended/ 
Structured Basic, a complete C 
Compiler a full ISO Pascal Compiler, 
the ANSI Standard CIS Cobol 
Compiler plus Relocatable Macro 
Assembler These high performance 
programming languages are all fully 
implemented and deliver unmatched 
performance and outstanding 
features. Additionally, OS-9 
compatible applications packages 
such as word processors, screen 
editors, spreadsheets, business 
software, and utilities are offered by 
a rapidly growing number of third- 
party software houses. 

PLUS OUTSTANDING 
MICROWARE SUPPORT: WE 
KEEP IN TOUCH WITH YOU 

Even when you have the best 
software and documentation, there 
can be times when you need 
questions answered. That's why 
Microware is committed to giving 
OS-9 users the best possible 
personalized service. Here are some 



of the ways we deliver solid support; 

■ A Software Support Hotline for 
direct access to our technical staff 

■ ''Pipelines", our free quarterly 
newsletter 

■ OS-9 User Seminars, the annual 
OS-9 community gathering 

■ a liberal update policy for new 
releases 

Microware does business on a person 
-to-person basis, When you call 
you'll find yourself speaking with 
someone who's both knowledgeable 
and genuinely interested in helping. 

YOU CAN COUNT ON OS-9 
NOW AND IN THE FUTURE 

Microware is not standing still — 
were firmly committed to continuing 
support for the 6809 and we will 
continue to introduce exciting new 
software products for the 6809. We 
will soon announce OS-9/68000 and 
programming languages for the 
68000 which will be upward 
compatible with 6809 versions, so if 
and when you are ready for the 
68000 your OS-9 software can go 
with you. 
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Microware Systems Corporation 

Box 4865 • Des Moines. IA 50304 
515-279-8844 Telex 910-520-2535 

OS-9 and fUwQe •/• KatomaAe <x m-« n?*,ir<j «no mkmXa 

Urt»i H 4 IMMTwt ol Bat Lmtn. 



OS-9: BETTER BY DESIGN 
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Articles submitted for publication should be 
accompanied by the authors full rumm, address, date end 
telephone number. It Is preferred that articles be 
submitted on either 5 or 8 Inch diskette In TSC Editor 
format or STYLO format. All diskettes will be returned. 
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If articles are submitted on paper they should be on 
wh Ite 8X1 1 bond or better grade paper. No hand written 
articles (hand written or drawn art accepted). AM 
paper submitted articles will be photo reproduced. 
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dark ribbon (no blue), single spaced end type font no 
smel ler then 'elite' or \2 pitch, Typed text should be 
approximately 7 Inches wide (will be reduced to column 
width of 3 1/2 Inches). Please use e dark rlbtxn! 

All letters to the editor should also comply with the 
above end beer a signature. Letters of 'gripes' as well 
as 'praise 1 are solicited. We attempt to publish ell 
letters to the editor verbatim, however, we reserve the 
right to reject any submission for leek of 'good teste 1 . 
We reserve the right to define whet constitutes 'good 
teste'. 
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TO REALIZE THE FULL POWER & PERFORMANCE OF THE 6809, LOOK TO GIMIX. 

GIMIX OFFERS YOU A VARIETY OF SSSO BUS COMPONENTS AND SYSTEMS. 



0S~9 8MX III 

*n» enx am c#u i m om warn, a MuihMr. Miio-tuting pottage <* 

theuttrv* m Systam MttnencB pfcs protection q| the system and other user* 
tram crashes caused by emn in ftfriduai usars P^Q r37 ^ - ^ejPfrw 
MKCPU&SOmvarv) ^JQJjP H69B.(n 

•flHLBff I/O RKXXSSOfl BOARDS kwro syston throughput by nedudng 
fcrienupts lo Hie host, buttering date transfer!, and dab prapnxB&aing Prices 
exajda on board %mwanj. Requfces system drivers. m 

til 3 port RS?32 Sett (SS30) ^iT TiW S4N.11 

#124 port ParfWHS^O) ^MW"T!\ $538.12 

OS-9 GMX11I drivers .. (included when purttesed with 6MX III package). $200.00 
0S*9 Level 2 users - carted GIMIX lor system requirements and avaftaWy, 

IttX OMX ■ #79 SYSTBMS: AN Induct 6MX 6809 CPU III and OS 9 6MX III 
<#ai): a«l1 3 pott inMigwi «Hal «/0 & cabta: #19 Classy Chassis; 192KB Stalic 
RAM, #68 DMAcortrotef. ail necessary cahtes, power relators, and HUer ptetes. 
Tha OS-9 Editor, Assart**. Debugger, BASIC49. and flUNB are Included. 

#70 with dual 40 track DSOD drives ^nffffeHm .79 

#79 wnh dual 80 track OSOOdrtvss J?|JUjr J6298 79 

#79 with #88 8" Dual Drive Obk System T7TT.Tr.. 17590,79 

#78 with #90 19M8 Winchester subsystem &one 80 track DSOO dnVe . W00.79 
Ur*l£X tor the 6MX 6009 CPU ill and Intefiigert I/O boards Is m dev^b— meri. 

OS-9 GMX I; OS-9 GMX II; Fl£X; and UnlFlEX 

The 105 GIMIX 6809 PLUS CPU board SS78.06 

Options GMXOAT S3S0O SwrpcOAT $15.00 

9S11A $312.00 9512 $265,00 

•49 64KB GHOST SYSTEM Includes t05 CPU; 1 19 Classy Chassis; 64 KB state RAM; a 143 2 
por t serial card & cables 166 DMA Controtter; all necessary cables, power regulators, and filter 
pales: GMXBUG mentor; FLEX: and OS-9 GMX I. You can software select either FLEX or 
OS-9, The OS-9 Editor, Assembto, Debugger, HAStC-09, and RUNB are also inducted 
#49 wta dual 40 track DSOO drtes $4399,49 

•49 wfa dual 80 Hack DSDD drives $4698.49 

♦49 wltti •888" Oual OrtveOfeX System $5998-49 

#49wWil90 19MB WtebfElersubsystenkS& one 80 track DSOO diive $7398.49 

•39 128KB SYSTEM includes •05 CPUwOAT #19 Ciassy Chassis; 128KB Of stooc RAM; a 
•43 2 pod serial card & cables: #68 DMA ConTOkrr; aft necessary cables, power regulates, 
and Met plates: GMXBUG monaor; FLEX. aM OS-9 GMX II. You can software sefed either 
FlEXot 0S9 The OS-9 Editor. Assembler. Debugger. HASIC-09, and RUNB, and GMX-VOJSK 
tor FLEX are included 

•39 with dual 40 track DSDO drives .... $499839 

•39 with dual 60 tock DSDD drWes $5296.39 

•39 wither Did frtveOskSysieni SffiS8.39 

•39 with »90 19MB WVc/teslwsiiOsySl^ $7996.39 

UnlrHEX. available at extra cost, requires 8" or Winchester drives A signed license apeemenl 
vwth TSC Is required before srwpmeni 

Yov oen add to any QIMIX system RAM, UOs and other options, or 
substitute nonvolatile RAM. QIMIX will customize to your needs. 

COMMG SOON: Conted GIMIX lor price and avadabJfcy on 40MB and 72MB Winchester 
(5YO dnves, (emuvtabte pack WVchasU-rs. 256KB static RAM boanis 

Al GIMIX systems are guaranteed for 2MH2 operation GIMIX systole indude documantatton 
for ail boards and software In a GIMIX Under All DRIVES ARC 100% TKVE0 AND AUG* ED 
BY GIMIX 

ALL BOARDS AND SYS1BMS ARE ASSEMBlfl), BURNETKIN, AND TESTED. GOLD-PLATO 
BOS CONNECTORS ARE USED. 

TO 0W8I BY MM. S0iD CHOCK Oft MONEY OW*R OR USE VOW VISA OR MASTW DO** Ptese 
aio* 3 *w*s tor pwot<cm*s teaser U.S. onjrs add $5 hmtoa <f oro* fe unto S20000 Rrtg* 
oiOnaOOSTOnvting iivder is unoar $200 00 *n^n on** over $200 00 w« be sl*prt vfe &nery AJr 
F«lQ*cnu£a.andmvWHcn*n*r»h*iik>Q Al trim nva be pnwiJ * U S Mv* Ftaseroeeur 
lonsgr decks. Nm been W*»o about 8 wee* lor cdfccto) so we wouU aovtsc wmng money, or ctads 
6nm on a bank am/e tifeJS, Oufbankfct* Catnrtt »x*s totoW a*<* al Cnk^o, 231 s 
US* $e««t. Ctiaoo, IL 60693. mnxMt #73-32033 \Au or Miter Ctep ^soaos|M 

GrjQHT MOORS: ADO $30 FOR SONi FWBl SUFflfS 

GMIX tnc mives the rfgt* ta do^ prtdng. ttrms, and prodx? stwftj fc m at any jrc «evaA 

tjfeisr noSce 

ALL PR£ES ARE F B CHICAGO 



Chooso from GIMIX' wide variety of system components. 

The eiMtX CIASSY CHASSIS #19 consists of a huvywetfu akjminum cabinel. constant 
voltage fBrro-fesofWU power supply, and SSSO Mother board wtth baud rata gen- 
erator boanj . . , , + $1398.19 

Triple Ofck regulator card and cattes $88.22 Baud rate genera** card $88.93 

Missing cycle detector $38.23 RBer pfetes $14.92 

Beckpa^c«if)eclorpla*s(spedry} $8.60 SOHz.opton $30.00 

MBrtOfVOI (QIMIX uses On* Stale RAM) 

•67 64KB NMOS STATIC RAM Hart S478.8T 

•64 64KB CMOS STATIC RAM board w/battery oack-up $568.64 

#34 6K PROM board $98.34 

•32 16sod0l PROM/ROM/RAM board 1238.32 

I/O 8ojrdi (see above (Or InlBAigent l/Os) 

•41 Single port serial, RS232/20n a. current loop $88.41 

•43 2 port serial. RS232 $1JM.43 

#46 8 port serial. RS232 $318.46 

•422ponparatel $88.42 

•45 8 port parade! $196.45 

•50 sertai, RS232, RS422. RS423 $244.60 

•52 SSOAsertaJ. RS232. RS422, RS423 $254.62 

•54 ACM C serial, RS232. RS422. RS423 $286.54 

Each cable with connectors tor bar* panel mounting (speedy boanj) $24,95 

DISK CONTH0L1ERS 

•68 DMA (feared in ai systems above) $688.68 

•29 dW c^r«. prngramrned I/O (5"dilves only) ., $296.28 

•58 single dens. proo/ammBd 1/0 (5" and/or 8" drives) $226.58 

•46 same as §58 but lor 5" diives only $198.46 

Cable sets 8° with Back Panel connect* $29.25 

tor two 8" external lives S44.26 

for two5" drives $34.96 

SOFTWARE: GIMIX excJosto versions of OS-9/GMX I II, III & FLEX are tor GIMIX haroware 

only All versions of OS-9 requte the 863 controfler 

When ordered with any controller, FLEX is $30.00 

GMXBUG PROMs and manual $98.65 

Boot or video Ooot PROM .... $30,00 UNIFLEX boot PROM ♦ $90,00 

0S-9GMXI $200.00 0S-9GMXII $500.00 

Editor $125.00 Assembler $125.00 

BAStC-09 $200.00 RUNB $100.00 

DISK DRIVES FOR GIMIX SYSTEMS - complete wffl cables and power legulators. 

5"rjSD0 40track 2 for $900 00 

b" DSDOBOtracfc ., 2 tor $1300.00 

•88" Ouaf 8" OSOO drives, cabinet, power suppry.& cables $2698.68 

Cabinet only S848.1B 220V 50H2 Option, add $30.00 

Filler plate $14.63 Cable for 2 di Ives $44.62 

Cable tor 4 drives S67.64 CaWe tor cabinet to eiatM rams $45.81 

WINCHESTER SUBSYSTEMS: lor use only in GIMIX systems with V66 

DMA toritroler 

•90: iodides one 19MB di»e. into***, and Software S3SB6 90 

•91:ir>cludesNo19MBCVwes.(r^rtac«aiidSottware $S284 91 

Contact GIMIX for price and avaftaftity of other torthcomjng subsystems 

OTHER BOARDS 

•76 GHOST 80X24 VlOEO BOARD $396.76 

•66 50 pm hutoUards $56.66 #33 30 p*n Prwoboai ds $38,33 

•O3680OCPU $224.03 

•08 6800 CPU with timers $266.06 Baud rate option, add $30.00 

•06 RELAY DRIVER (boart. braxkel, IranslorrnBr, and 31 relays) , $1126.96 

•86 -#08 (board, brac«et, transfumw . without relays) . ... S536.B6 

»650PT0board $348.65 

WINDRUSH EPfWM PROGRAMMER $37100 

3" Binder 12.00 2" Binder $9.00 

GIMIX 0006 NOTOUAAAlfTH PERFORMANCE OF ANY GlMDt SYSTEMS, BOARDS OR SOFT- 
WARE WHEN USED WTTH OTHER MANUFACTURERS PRODUCT. 

00N7 SB IT??? ASK) OUR BROCHURE HAS MORE COMPLETE DKCRfflONS ANO SPOCS. 
PHONE OR WRITE TODAY FOR YOUR COPY. 

6A3C09 «1 OS4 *» *m*n*ky t» mamn Sydom Cop *d MOTOKHA mc R£X ** Ur^UDi n WBniks of 
Tata* Syd«eCifB*«. inc CMOl 90ST. GM*. QAS5V CHASSIS. *■ axm*a of Out*. *c 



Eimix 



IRC. 1337 WEST 37th PLACE • CHICAGO, ILLINOIS 60609 
(312)927-5510 • TWX 910^221-4055 




CI999QMIXINC M3 

'68* Micro Journal 



Microware presents 4 new 
OS-9 software packages. 



r 



LEVEL II 

PRINT SPOOLING SYSTEM 



This versatile package gives your OS 9 Level Iwo System a 
complete print spooling management capability for time- 
sharing applications. Features of the spoofing system are: 

■ Handles up to seven independent spooling devices and 
queues with "print on first available device" feature. 

■ Prints large block header pages between listings with date, 
time, user name and job name. 

■ Multiple listing copy option. 

■ Complete forms change capability for each job and device. 

■ Prints formatted or unformatted listings. 

■ Status command displays print queues and status. 

■ User can kill or change priority of queued jobs. 
Available only for OS-9 Level Two Systems. 
Suggested List Price: $150.00 Manual Only: $15*00 
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RMA RELOCATABLE 
MACRO ASSEMBLER 



At fast — a full feature relocatable macro assembler and 
linkage editor for OS-9. RMA permits sections of assembly 
language programs to be independently assembled to 
'relocatable object files*. The lintege editor tales any number 
of program sections and/or library sections and combines 
them into a single executable OS 9 memory module. Global 
data (including indexed and direct addressing modes) and 
program teferences are automatically resolved in the pro- 
cess. The macro facility permits commonly used statement 
sequences to be defined, then used within the program with 
appropriate parameter substitution. RMA also supports con- 
ditional assembly and library source files, 
Suggested Ust Price: S20Q.00 Manual Only: S20.00 
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OS-9 FILE HANDLER 
TOOLBOX 



introducing a special toolbox for OS-9 users who do a lot 
of file manipulation! A collection of 12 useful OS-9 command 



programs: Most can be used as "filters'* using OS-9 pipeline 

facilities. Included are: 

D — unformatted directory listing with "wild card" matching 

Compress — does character compression on text files. 

Expand — restores a 'compressed" file to the original state. 

Split — breaks a file into smaller files. 

Space — indents lines with optional spacing between lines. 

Code — decodes any key on a keyboard to hex. 

Qsort — quick sort for small files, directories, etc. 

Pr — versatile formatted file printing utility. 

Tr — transliterates text pattern to substitution pattern. 

Grep — searches file for a pattern and prints matching fines. 

Xmode — same "tmode" except changes are made to the 

device descriptor. 

Count — counts words, lines, or characters within a text tile. 

Suggested Ust Price $65.00 
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ENTERTAINMENT 
PACK I 



A collection of games and other interesting programs that 

are not only entertaining but serve as good instructional 

examples of Bastc09 programming techniques. All programs 

include complete BastcW source files and can be easily edted 

to run on standard alphanumeric or graphics terminals. 

Blkfek — A Vegas-rules blackjack game. 

Ok — graphical display of a wall clock on your terminal 

Dogs — Greyhound racing with simulated graphics. 

Eliza — BastcOG version of the famous artificial intelligence 

simulation of natural language dialogue with a psychiatrist. 

Haiku — Program that creates original "haiku" prose. 

Quest — a mini-Adventure*' game. 

Rats — find your way out of a computer-generated maze — 

from a rat's point of view. 

Towers — a graphical display of the solution to the "Tower 

of Hanoi" puzzle. 

Suggested Ust Price: $85.00 



MICROWARE. 



Microware Systems Corporation 

P 0. Box 4665 • Des Moines, IA 50304 
515-279-8844 ■ Telex 910 520-2535 
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FLEX ™ USER NOTES 

THE 6800-6809 BOOK 

By: Ronald W. Anderson 

As published in 68 MICRO JOURNAL'" 




The publishers of 68 MICRO JOURNAL are proud to announce the publication of Ron Anderson's FLEX USER NOTES* in 
book form. This popular monthly column has been a regular feature in 68 MICRO JOURNAL SINCE 1 979. It has earned the 
respect of thousands of 68 MICRO JOURNAL readers over the years. In fact, Rons column has been described as the 
Bible' for 68XX users, by some of the world's leading microprocessor professionals. Now all his columns are being 
published, in whole, as the most needed and popular 68XX book available. Over the years Rons column has been one of 
the most popular in 68 MICRO JOURNAL. And of course 68 MICRO JOURNAL is the most popular 68XX magazine 
published. 

As a SPECIAL BONUS all the source listing in the book will be available on disk for the low price of: FLEX " formatonly — 5" 
$12.95 — 8" $1 6,95 plus S2.50 shipping and handling, if ordered with the book. If ordered separately the price of the disks 
will be: 5" $17.95 — 8" $19.95 plus $2.50 shipping and handling. 

Listed below are a few of the TEXT files included in the book and on diskette. 

All TEXT files in the book are on the disks. 



LOGO.C1 

MEMOVE.C1 

DUMP.C1 

SUBTESTS! 

TERMEM.C2 

M.C2 

PRINT.C3 

MODEM.C2 

SCIPK&C1 

UC4 

PRINT.C4 

SET.C5 

SETBAS1 C5 



File load program to offset memory — ASM PIC 
Memory move program — ASM PIC 
Printer dump program — uses LOGO — ASM PIC 
Simulation of 6800 code to 6809, show differences — ASM 
Modem input to disk (or other port input to disk) — ASM 
Output a file to modem (or another port) — ASM 
Parallel (enhanced) printer driver — ASM 
TTL output to CRT and modem (or other port) — ASM 
Scientific math routines — PASCAL 
Mini-monitor, disk resident, many useful functions — ASM 
Parallel printer driver, without PFLAG — ASM 
Set printer modes — ASM 
Set printer modes — A-BASIC 
(And many more) 



"Over 30 TEXT files included in ASM (assembler) — PASCAL — PIC (position independent code) TSC BASIC-C, eta 

NOTE: C1„C2, etc. = Chapter 1, Chapter 2. etc. 

This will be a limited run and we cannot guarantee that supplies will last long. Order npwjor early delivery. 

Foreign Orders Add $4,50 S/H 
Softcover — Large Format 

Book only: $7.95 + $2.50 S/H] 

With disk: 5" $20.90 + $2.50 S/H j 

With disk: 8" $22.90 + $2.50 S/H 

See your local 550 dealer/bookstore or order direct from: 




Computer Publishing Inc. 

5900 Cassandra Smith Rd 

Hixson, TN 37343 

(615) 842-4601 

'"FLEX is a trademark ol Technical Systems Consuttanis 
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WE CAN EMULATE 
THIS CHIP BETTER 
THAN ITS MAKER. 








Advanced 

Digital's Test 

Station Integrates 

and Debugs Your 

System Faster. 




Introducing Advanced Digital's 
new 4009B Test Station* The test 
station that combines emulation and 
logic analysis into one system . Until 
now, most emulators operated in real-time 
by restraining the target system. Not with 
Advanced Digital, Our 4009B Test Station is 
totally transparent. Totally real-time. We meet or 
exceed manufacturers timing specifications. This 
is particularly important when emulating inter- 
rupt intensive systems and accommodating 
DMA operation. 

Universal operation enables you to emulate 
6809 and 6809E series microprocessors without 
making software or hardware changes. 
Up to 128K of memory overlay, four 
hardware triggers and 2K deep 
of trace help you pinpoint 
problems faster A line-by- 
line assembler and a 



4009B TEST STATION 




powerful trace disassembler are standard. They 
enable you to view software and make changes 
without returning to the development system. 

MORE THAN AN EMULATOR 

As a "digital engineering test station," 
Advanced Digital's 4009B gives you a synergistic 
approach to integration problems. Two micro- 
processors control the system. One is dedicated to 
emulation while the second microprocessor 
supervises the 32 channel logic analyzer and all 
system menus. This design lets you emulate and 
perform all system functions simultaneously. 

Discover the most powerful diagnostic tool 
available for hardware and software integration. 

Call Advanced Digital Technology for a free 
demonstration. 



®€ 



Advanced 

Digital 

Technology 

13400 Northup Way, #27 
Bcllcvuc. WA 98005 
(206) 643-2382 
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TMP (Total Management Planning) 

OS- 9 SOFTWARE 

THESE OFF-THE-SHELF APPLICATION PACKAGES HAVE CHANGED THE PICTURE 

FOR PROFESSIONAL SOFTWARE USERS 

Here ere the comprehensively 
supported OS~9 application soft- 
ware packages that discerning 
professionals ere selecting today. 
Each one runs stand-alone or 
In combination with other TMP 
packages. 

TMP/CALC is a netihgeneration 
"Electronic Spreadsheet" package 
lhai goes a quantum leap beyond 
ordinary Calc software. Superior 
speed, and extra features like 
Dynamic Calculations and Dy* 
namlc Ovrrlay, mean you can 
change a cell anywhere on the 
spreadsheet and get automatic 
updates wherever they belong. No moir 
"wrap around" since output to the pilnl 
er Is formatted. "Help" screens prompt 
without erasing data, and the rows and 
columns on any worksheet are II ml led 
only by available memoiy. 
ONLY $250 




TMP/liftnager Is a structured database, 
manager, and Is the ultimate driving 
force behind any total Management/ 
Marketing Planning system, lis built in 
selecl/sorl/mcrge module — and opt I 
mlzcd machine code — makes U super 
fast, and provides unusually nimble data 
manipulation characteristics. Other out 
standing features an? detailed prompt 
lng.easy Identification of data Odds, and 
an excellent security system. 
ONLY $500 

TMP PtccPorm Hlls the void between a 
structured DBMS and woid processing; 
It's an "electronic Index card" package 
with an endless list of valuable appllca 
Uons such as parts cataloging, look up 
Inventories and listings of any kind. 
Type anythJ ngon up to 32.000 electronic 
"cards" of up to 9 pages each that re 
side In "file drawers" (databases). Up to 
13 key-words can call each page. 
ONLY 8150 

TMP/Front-End Integrates any or aJI 
of the packages described above, and 
Integrates TMP with word processors. 
BASIC and other high level languages. 
NO CHARGE with TMP/Maoager 



TWSP 



TMP PACKAGES ARE 
EXCEPTIONALLY FRIENDLY. 
EACH COMES WITH 
MULTI-MEDIA TRAINING 
AND OUTSTANDING 
DOCUMENTATION 

AUDIO CASSETTE TRAINING TAPES 

are provided with each TMP software 
package. These crisp, professionally pro 
duced training aids take a new user- 



through "hands-on" exercises that In- 
stantly build confidence, and minimize 
reference to manuals. 

CLEAR DOCUMENTATION Is specially 
prepared for each TMP package. 
Remarkably readable because 
they are conversational In style 
and logically organized, this ser- 
ies of manuals further assures 
quick user comfort and pro- 
ductivity with TMP software. 
Includes sections on how to best 
utilize the system.- Integrating 
user written software with TMP 

packages and other bonus topics, 

VIDEOTAPE PROGRAMS are available 
to TMP Dealers. They dramatically take 
the viewer Into real business environ 
ments for a close look at how a TMP 
software package Is utilized. Video pro- 
grams can be personalized for specific 
organizations. Programs may be sped 
lied for most popular tape formats. 

THE 80TTOM-UNE IS THIS; Software 

Is only as effective as Its training and 
documentation. TMP packages are In- 
eomfxtrabk' In both arras. 



RUN TMP IN A SMOKE SIGNAL CHIEFTAIN- COMPUTER 
TO EXPERIENCE THE KIND OF SPEED AND POWER YOU 
CAN EASILY AFFORD 7004/ 

Endurance-Certified Chieftains an? con- 
sistently among the fastest computers 
In CPU and I/O speeds according to 
the widely respected BENCHMARK RE 
PORTS. That, combined with almost 
legendary reliability, makes Chieftains 
the logical choice In computers using 
OS 9 operating systems. 

Configurations range from floppy disk 
systems to multiuser, mult I tasking 
Winchester hard disk systems with tape 
backup: performance approaching main 
frames at prices you can live with. 

TMP software packages for most OS 9 
systems and Chieftain computers a/r 
offered exclusively from Smoke Signal. 
Inquiries from non-Smoke Signal dealers 
are Invited. Call (2131 889-9340. 



SMOKE SINAI. 

Chieftain Computers 

31336 Via Colinas • Westlake Village, CA 91362 

(213) 889-9340 
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BUBBLE MEMORY 

HIGH RELIABILITY STORAGE 
FOR THE SS -50 BUS 

D I S K B U B provtdes 128K bubble memory 
replacing a disk drive O 

%■• O 

— no moving parts to wear out , |x 

—direct boot capability 

— Withstands harsh environments 
such as dust, heat, vibration 

— faster than standard drives 

— utility software supplied 

Disk bub plugs into the 30 pin l/o'bus 
Flex09 drivers and boot rom provided O 

Available lor only O 




$34500 




iiniversalX^ 

k nATA \1 

RESEARCH^ 
|NC 



2457 Wehrle Drive. B-68 
Buffalo. New York 14221 
Phone (716) 631-3011 



Dealer Inquiries Welcome 



FLEX* and UniFLEX* 

software for the 6809 



DATA 6ASE 
MANAGER 



Customer 

PROGRAM 



VENDOR 
PROGRAM 



, i / 



ORDER 
FNTRY 



INVENTORY 



r 



ACCOUNTS 
RECElVABLt 



GENERAL 
iEOGER 



\ 



v 



PURCHASE 
OROFR 

I 



ACCOUNTS 
PAVABLF 



PAYROLL 



Business Software For The 

COLOR COMPUTER 

WITH FLEX a * XBASIC 



Data Base Manager 

Part \ 



Part ir 



Church Contributions 

Balanced Billing System 

Single Entry General Ledger 



$49.95 
$49,95 
$49.95 
$49.95 
$49.95 



Integrated Business Software* 

• available for Color Computer only 

Accounts Receivable $ 99.95 

Accounts Payable $ 99.95 

General Ledger __ $189.00 

Inventory 2 ■ — $ 69,00 

Payroll - $ 99.95 

64K memory upgrade 

including installation .5 79.00 




Call or Wme for iree catalogue 

2457 Wehrle Or . D BO, Buffalo. NV 1«221 
PHONE |716| 63V3011 
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Integrated 
Business Programs 



Accounts Payable 



Accounts Receivable . 

General Ledger 

Inventory 2 

Payroll 
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Data Base Manager . 
Word Processing 

Software 

WP Menu 

P Control 



FLEX 
$295 
$295 
$295 
$295 
$295 
$350 

$295 



UniFLEX 

$395 

$395 

$395 

_ $395 
_ $395 
$450 



$395 
$150 
$150 



UNIVERSAL 

DATA 
xx RESEARCH 
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(Color Hfltrro iloarnal 



5900 Cassandra Smith Rd. * 



Hixson.TN. 37343 



COLOR MICRO JOURNAL ™ Is A Monthly 
Tabloid Publication for Color Computer USERS! 

•• 

COLOR MICRO JOURNAL™ is a Magazine FOR 
Color Computer Users BY Color Computer Users. Col- 
umns on various compatible Operating Systems, Lan- 
guages, Uses (Bulletin Boards, Clubs, using the RS 
BASIC, and so on), etc. 

••• 

Programs - Games - Reviews - Education - Hardware - 
Software - New Product Announcements - Books 

•••• 

Get the MOST from your COLOR COMPUTER 

without being an Engineer. 

DONT MISS A SINGLE ISSUE 

Subscription Rate of only $16.50 a Year!!! 

••••• 

COLOR MICRO JOURNAL™ published by the 
ONLY pure 68xx, INTERNATIONAL Computer Maga- 
zine. '68 Micro Journal has provided coverage for over 
FIVE Years. We KNOW the Color Computer, the Soft- 
ware (both FUN and WORK) that IS and CAN BE run on 
it. We KNOW the products that ARE, CAN BE, or 
WILL BE used on the Color Computer. 

For Ordering Subscriptions By Phone 
Call 1-800-338-6800 




dolor fHirro Journal 

Limited Time Charier Rates 

USA -$M ,30 per >car. Cttoaft & HeWQ - H.UM) per ycat 
Surface Foreign - $28 00 per >ear. Airmail Foreign - S52.UO per scar 



"Color Micro Journal is a trademark of Computer PuNishing; Inc 



Yes! Start my copy of Color Micro Journal coming as *»o» as 
possible! 



Nam* 

Add ref- 
ill* 



-Stale 



Zip_ 



] Visa Q Master Card ^) Check or Money Order Enclosed 

Card # 

Kxp/Dale 
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Flex User Notes 



Ronald W. Anderson 
3540 Sturbrlcfge Court 
Ann Arbor, Hi 48105 



NOTE 

Please note that this column Is being printed out 
of order- One of three things happened- I never 
mailed this one, It was lost In the mall, or the 
staff at '68' Micro somehow lost It. The benchmark 
portion of this was written as a more considered 
response to the article by David Shearer In the June 
*83 Issue, and was done after I found a copy of the 
Byte article that listed the original timing results 
for their Benchmark program to find prime numbers. 
I wrote a letter to the authors of the original and 
to David Shearer, but neither has responded. 

What Happened to the 68000? 

I'll start out by saying that the title Is a 
question that I will be asking, and not answering. 
I note with some chagrin that Cramemco has a couple 
of new systems out. One of them contains a 68000 
and runs a variant of UNIX as the operating system. 
I've seen nothing or less In the pages of '68' In 
the way of SS-50 bus and 68000 getting together. 
Helix seems to be the only manufacturer that Is 
supporting a 68000 system on the "extended* 1 S-50 
bus, which they call the S-64 bus- 
Mo one Is advertizing software for a 68000 In 
these pages, perhaps because there Is no bus, 
standard or otherwise, around which to supply 
software* Are the 68XX equipment suppliers going to 
let Cromemco and others put the 68000 on the S-100 
bus before we have anything going on the S-50? 
What's wrong guys7 Is the apparent market too small 
to bother wlth7 Old all the "biggies" Jump In ahead 
of you 7 Perhaps the 68000 Is viewed as fitting Into 
a business computer system to replace or compete 
with the MINI'S, and as being too costly to Interest 
any hobbyists. 

A friend of mine has bought the Motorola 680O0 
evaluation board, and we have been waiting for a 
couple years now, for a cross assembler that doesn't 
cost more than the evaluation board. "Hand" coding 
of machine language was easy on the 6600, a good bit 
harder on the 6609, and considerably more a chore on 
the 68000, though my friend has done some hand 
coding and verified that the system does run. 

(Late note: LLoyd 1/0, supplier of Crasmb, the 
cross assembler series, has a test version of a 
66000 cross assembler that runs under Flex, now out 
to some selected testers for evaluation- It should 
be aval I able soon.) 

I received some timing Information for a test 
program run on a 66000 system a year or more ago, 
that was rather disappointing- It was run In the 
only available Pascal at that time, and the program 
ran faster In a 6809 Pascal version on a 2 MHZ 
system. The 68000 was running at 4 MHZ at that 
time. 

While Tt was Inevitable that the 6809 would 
eventually do away with the 6800 for the most part, 
I don't see that happening with the 68000. There 
will be applications around for a good long time for 
which the 6609 Is very wel I suited In terms of 
capability and speed, and It will be a much more 
economically feasable solution for a number of 
applications for a long time to come. On the other 
hand, there ore applications for which the 68000 Is 



very well suited. When ore we hobbyists (and 
Industrial users) going to have an alternative to 
the "monster bus" that Motorola has created and the 
very high priced but very capable development system 
that supports It7 

I'd like to quote a recent letter from a reader 
here. "The 68000 Is a fantastic machine. Do you 
know where It sits on the SS-50/64 bus though? The 
only machine advertised so far Is the HELIX, and no 
mention has been made about software. I'm not sure 
what HELIX owners are supposed to do. What are 
Glmmlx, TSC, and Mlcroware doing about the 68000 
(and when)?" How about It you suppliers? Another 
letter Indicates that the writer simply assumes that 
no software will be available for the 68000. 
"--•I'm planning to develop that on a 66000 machine, 
and I don't quite have the hardware finished yet, 
let alone an OS..."- (Operating System, that Is). 
Since I haven't cleared these quotes with either of 
the writers, and I'm not sure they want their names 
published, they will be anonymous for now. 

Compl fers 

I know, I know, you ore groaning "not again!". 
This month though, since l f ve started In an 
editorial direction, I thought I'd continue In that 
direction. My thinking has changed a bit In the 
past couple years regarding compilers and what they 
should be. I wrote a letter to one supplier asking 
why on earth he would spend his time patching BASIC 
and generating a completely non-standard version of 
It for his compiler system, when he could be 
designing a compiler for a standard language. That 
supplier must have given up on me on the spot, since 
he has never written to me again- The product was 
good (I have It), though only available In the 6600 
version for FLEX- At the time I thought the 
approach was bad- This was back In the days when 
hobbyists were all In the BASIC camp, and perhaps 
that was the reason for the choice. 

Since then, I have seen FORTH, Pascal, and "C" 
versions by the dozen(s). FORTH has been well 
adapted to run on the microcomputers. Pascal, If 
left "standard" has no ability to drive hardware. 
All the Implementations have added features that 
allow variables at absolute addresses, or some 
variation of PE€K and POKE to allow data transfer to 
an 1/0 port. "C" allows usfng pointers to addresses 
for data transfer, and It Is rather self sufficient 
to run on a micro. It Is generally customized for a 
particular hardware system via library files written 
to tie It to that system. 

It seems to me that the library approach Is a 
much better way to customize the language for a 
particular system. The language remains standard 
and the library Is the link to each Individual 
computer system on which It runs. In all fairness, 
and In retrospect, I have to admit that STRUBA1. was 
set up that way, with a very standard compiler 
section and a set of drivers to adapt It to various 
operating systems. 

Since I wrote that letter about the BASIC 
compiler a couple years ago, I've reconsidered the 
facts, and have reached a different conclusion. The 
standard languages were pretty much designed to run 
on large computer systems that have batch 
processing. (That Is, I think, the reason for 
Pascal's lack of string handling capabilities). 
Most microcomputer systems ore much more user 
Interactive than large mainframe systems. Since 
they ore different, perhaps the programming 
languages ought to be different also. Microcomputer 
hardware Is used a great deaf In applications where 
there Is no terminal, no disk drive, and no printer. 
Frequently In Industrial applications the only 
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output might be control signals to solid state 
relays to run a machine, and perhaps some status 
fights or Indicators of some sort- Surely Pascal Is 
not the language of choice for such application 
programs. 

Perhaps some of the recent non-standard languages 
that have been "tailored" to small computer systems 
programming or to control systems programming, do 
real 1y make more sense for the microcomputer. If I 
am writing a program to run a coffee vendor, do f 
really care that f can't send ft to someone with a 
different microprocessor to run7 Obviously, that Is 
an advantage for me. It will be harder for someone 
else to steal my programl What I really want Is 
efficiency of compile time and memory usage for the 
final object code. If the price for that Is being 
non standard, and perhaps having to think a bit more 
so the compiler can be simpler and smaller, that Is 
perfectly fine. 

Obviously, If I am writing the world's best 
screen oriented editor, f want to write It so that 
It can be adapted to run on all the other systems 
based on other processors. In that case f want a 
standard language, and f will be most careful to use 
only standard features and not extensions of the 
language. My conclusion must be that there Is a 
place for both approaches. The best approach wfll 
vary wfth the situation. 

MORE TIME TRIALS 

Last month f commented on David Shearer 1 s article 
In the June fssue compering the 6809, FLEX9, and the 
available software wfth the Z-80, CP/M and Its 
available software. 1 reported on the benchmark 
execution times for Wlndrush (James KcCosh's) *C" 
compiler (TO seconds) and Wlndrush PL/9 (14 
seconds). <l 've sfnce reduced the PL/9 tfme to 12.5 
seconds)* I later coded the algorithm In GSPL (my 
revfew should have appeared by now) from Workman 
Associates* It executed In 18 seconds (all on a 2 
MHZ system). All three of these look very good 
compared to the top CP/M compilers run on a 4 MHZ Z- 
80. 

After reporting those ffndfngs, I received a note 
from Lucldata Indicating that they had run the 
benchmark with vastly different results. Just fn 
case the report from Lucldata doesn't (or didn't) 
get printed, they report that the benchmark will run 
In thefr latest version on a 2 MHZ system In 260 
seconds contrary to the reported time of 735 
seconds. The versfon of Lucldata Pascal that f have 
Is not quite the current one, but the Pascal program 
I Isted here runs fn 250 seconds on a 2 MHZ system, 
which leads me to believe that the time reported by 
Nigel Bennee of Lucldata, Is very accurate, (and 
that 1 have the correct algorithm)* 

Sfnce f had gotten started on thfs project, f 
decided to try OmegaSoft Pascal and see how ft would 
fare In these trials. The current version of OMS 
came 1 n at a very respectable 14 seconds* Just for 
kicks I tried their old version 1 and It ran the 
same program In 55 seconds. I guess there was quite 
an Improvement In the Integer math or array access 
In version 2. Incidentally, because of the use of a 
library In conjunction with a linking loader, the 
total object code generated by OMS for this program 
was under 2K. That Is compared to 3.5K to 6K for 
most a II of the others. 



structure, I decided to code the main cross out loop 
as a FOR NEXT* An error showed up, and It turned 

out to be the case where the Initial value of K% Is 
larger than 8190, le. 3J+3 > 8190. I had to add the 

test IF K>8190 THEN 160, to skip the FOR NEXT loop 

and only count the prime. The time for this program 
Is 435 seconds compared to the 840 given In the 

article. It could be coded using GOTO, but the 

coding here more nearly matches the C and Pascal 

versions. 

I decided to try T$C Pascal (FLEX9 version), and 
my results were 22.5 seconds compared to the 
reported 54! 1 suspect that result was at 1 WZ 
also. The only other compiler In the Shearer list 
that I have Is Dynasoft Pascal. I complied the 
Pascal version In that also, and It ran In 255 
seconds compared to the 309 In the article* You 
might be Interested to know that the total runtime 
plus user program byte count for this package Is 
7061 This Is an Integer Only Implementation, which 
Is fine for many applications. 

The variance between my results and those 
reported are too large to be a simple efficiency In 
my program over those reported. All four of the 
Pascal compilers I tested, were tested with the 
Identical program. They all complied It without 
errors. Yet my Dynasoft version ran In 82.51 of the 
reported time, while the same program In TSC Pascal 
ran In 421. In the case of Lucldata, the number was 
341, and for TSC BASIC It was 521. I should say here 
that my timing method was probably not as precise as 
that used In some of the tests, but the error seems 
large enough so that I think mine are a bit closer 
anyway. Late along here, t had an Idea that 
possibly the new algorithm used In the January test 
reports had printed out the primes each time. I 
quickly decided that times like 8.78 seconds and 11 
seconds would be Impossible If that had been done. 

LATE NOTE: 1 checked the BYTE article and found 
that I had printed the total prime count ten times 
whereas the benchmark algorithm printed It only once 
after ten Iterations. Therefore, my times might err 
a bit on the long side. I am at a loss to explain 
the disparity between my times and those reported In 
BYTE, unless some of the reporters didn't take 
advantage of the features of the languages, such as 
using Integer variables In the Extended BASIC 
version, etc. 

By now, some of you are getting the Idea that 1 
am prejudiced. Of course I ami Comparsions are 
only fair If they present the best both sides have 
to offer* Mm trying to Insure that at least one 
side presents Its best case. Maybe I am a 
frustrated lawyer at heart. 

COMPILER BENCHNftRK HUES 
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Since a few of the times didn't seem to agree 
very we I I with the Shearer article, (or to be more 
fair, with the times reported In BYTE) I decided to 
try all the others that I have. The first was TSC 
Extended BASIC I coded the algorithm using Integer 
variables. Since BASIC doesn't have the WHILE DO 
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NOTES: LUCIDATA, DYNASOFT, AND IMS PCODE ARE 
P-CODE IMPLEMENTATIONS. 

TSC I BASIC IS AH INTERPRETER. 

TESTS ON 2 mi FLEX9 SYSTEM. 

» REPORTED IK BVTE 40 SEC DN IKK? SYSTEM. 



Some observations might be that three of "our" 
compilers are faster than "their" fastest on a 4 WZ 
Z~80. We have six that run under 22 seconds- They 
have four that run 19 or under on a 4 WZ Z-80. For 
either processor, the P-code Interpreters tend to 
run about 10 times slower than the native code 
compl lers. (IMS P-code seems to be an exception)- I 
wonder If David Shearer will hear similar stories 
from the Z-80 users? For the record, I will Include 
the listings of my benchmark coding for the Pascal, 
C, and BASIC versions here- Our Z-80 friends can 
look at them to see If I cheated anywhere- I 
consider using available data types such as CHAR In 
the Pascal version, and Integer UJ etc-) In the 
BASIC version and 'char 1 or •short' In the C 
version, to be making good use of the compiler and 
NOT cheating. 

THE 6640 

Now that I f ve praised Motorola for their fine 
6809 design, I'd like to throw a brick through 
someone's window for Ignoring the poor programmers 
In the design of the 6840 triple timer. Three 
tlsrers, each of which require a 16 bit (word length) 
register to preset their count, and one control 
register, should need 9 memory addresses, right? 
Well some hardware designer decided that It would be 
better to "multiplex" the control registers for two 
of the timers Into one address (access Is via a bit 
In the third control register). I assume the reason 
was to save one register select and not "waste" 7 
addresses of our very limited 65,536. 

F00EYI One more address bit (register select) 
would allow decoding 16 addresses. (Of course 7 of 
these are not needed). Squandering those extra 
seven bytes would save a lot more than that In the 
code necessary to Initialize and use the timers In a 
typical application* Sure would make things a lot 
nicer In programming the 6840- Just think, that 
would mean there could be three Identical timers 
with the timer registers addressed at XXXO, XXX4, 
and XXX8, and the control registers two addresses 
higher of XXX2, XXX6, and XXXA. Learn how to 
program one, and you have all three down pat. Too 
simple an Idea for some hardware designer who 
doesn't have to use the timer to have thought of. 
Maybe they could even find uses for the other 
addresses* How about splitting functions Into 
multiple registers to save some code In the 
Inevitable ANDIng and ORIng that bit by bit 
programming forces upon the programmer. Those chips 
only have to be designed once. Manufacturing costs 
wouldn't change appreciably* Programmers would be 
forevermore gratefull 

THE NAY HAS IT 

I've never met Bob Nay, though I've talked to him 
on the phone a few times, so I don't feel like I'm 
"blowing our own horn" (or starting a mutual 
admiration society) when I say what follows. I read 
Bob's column every month with Interest. In the June 
Issue, he started a project with which I had been 
toying for some time* He started a series of 
columns on Programming a Computer In general, with 
no Intention of getting very language specific 



I had started "test writing" a couple chapters or 
columns on that subject some time ago, but the 
project got bogged down. I found It extremely 
difficult not to get specific languages Into the 
discussion very early. I decided that Bob was going 
to do a better Job than I had the time, Inclination 
(maybe talent) to do, and sent him my preliminary 
efforts. I hope he Is able to glean a good Idea or 
two from the material. Meanwhile I will be 
satisfied with writing random thoughts, projects, 
and test reports such as this. 



/* Erathosthenes Sieve Prue Muiber Proqrai in C t/ 



•include stdio.h 

•define true 1 
•define false 
•define size 8190 
•define sizepl B191 

char flagstswepl); 

iain() 

(int i, priie, k, count, iter; 
puts <"\nlO lterationsVn'); 
for <iter=l;iter<=10;**iter) 
{count-0; 
for (i=0;i<=size;**i) 

fUgstiJ=true; 
for (i-0;i<=size;**i) 
<if (flagstiJ) 
(priie=)*i*3; 
k=i+priie; 
while (k<=size) 
CflagsCkMalse; 
k=k+priie; 
> 
♦♦count; 



) 



} 



outdec (count); 
puts P priiesNn'); 

} 
outdec (n) 
int n; 

(int a; 

if (a-n/10) outtfec (a); 

putchar (nX10>'0'); 

) 



PROGRAM PRIME (INPUT, OUTPUT); 

( PRIME BENCHMARK PROGRAM IN PASCAL ) 

CONST 

SIZE = 8190; 



VAR 



PRIME i ARRAY 10.. SIZE] OF BOOLEAN; 
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CQUNT.I V J,K V L : INTEGER; 

BEGIN 
FOR I := TO 9 DO 
BEGIN 

COUNT := 0; 

FOR I := TO SIZE DO PRIME [I J := TRUE; 

FOR I :- TD SIZE DO 
BEGIN 
IF PRIME 0) THEN 
BEGIN 
J:= I ♦ I ♦ 3? 
K :* 1*J; 

WHILE K (= SIZE DO 
BEGIN 

PRIME [Kh= FALSE; 
K := K*J; 
END; 

COUNT := COUNT ♦ lj 
END; 
END; 

NRITELN; 

KRITELN (CQUNT:5, 'PRIMES'); 
END; 
END. 



30 DIM PRKB190) 

40 FOR LZ*0 TD 9 

50 CT1-0 

hO FOR IZ*0 TO B190 

70 NKIU'I 

80 NEXT IX 

B5 PRINT 'DONE INIT' 

90 FDR I 1*0 TO B190 

100 IF PRXUZIOO THEN 110 ELSE 170 

110 JM1HZ+3 

115 KX=IZ*JZ 

119 IF KDB190 THEN 160 

120 FOR KZ=KZTO B190 STEP Jl 
130 PRZ(KZ>=0 

140 NEXT a 

160 CTZ=C7Z*I 

170 NEXT IX 

J80 PRINT 

190 PRINT CTX?' PRIMES" 

200 NEXT LZ 

210 END 
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The OS-9 I/O System 

OS-9 uses a modular I/O system designed for 
simplicity and flexibility* Because of this 
nodularity an exceptionally ambitious user could 
write a new I/O subsystem and graft It Into OS-9 
without making any changes to the rest of the 
operating system. But there are other aspects of 
the I/O system which don't require any programming 
to exploit, and so useful that new OS-9 users should 
play with them as soon as possible. 

The Unified Input/Output System 

Each OS-9 process has three standard paths 
(files) open when It starts. Path O Is called 
standard Input, Path 1 Is standard output, and path 
2 Is standard error. It Is possible for a program 
to close these paths and re-open them for Its own 
purposes, but most programs leave them open and use 
them as one might think they should be used* 

The standard Input path usually reads from the 
keyboard (terminal), and Is used as the primary 
source of Input from the user. Programs can and 
often do open other Input files, sometimes the 
majority of the Input Is from some path other than 
standard Input, but standard Input Is by convention 
the path used for communication with the user. 

The standard output path typically writes to 
the screen (terminal), and Is used for routine 
output to the user. Every character that appears on 
your screen probably came from a standard output 
path* 

The standard error path Is seldom used* By 
convention It Is used for error messages* Normally 
the standard error path Is directed to the screen 
together with the standard output path- The 
rationale for having separate paths for routine 
output and error messages rises from a special 
characteristic of the standard paths* Each of the 
paths can ba directed wherever the user wishes 
before a program Is started* This can prove useful 
when It Is convenient to have different things done 
with error messages than with the rest of the output 
of a program. 

The standard paths are open when a program 
starts because they are Inherited from the process 
that started It, In most cases the shell* The shell 
takes advantage of this ability to pass Its standard 
paths on to the programs It starts to change the 
paths from the standard (all to the terminal) to any 
other disposition a user might specify. 

Options on a shell command line Indicate to the 
shel 1 what needs to be done to the standard paths* 
The options are ">xxxxx H for "redirect standard 
output to xxxxx," "<xxxxx" for "redirect standard 
Input to xxxxx," and "»xxxxx" for "redirect 
standard error to xxxxx ." If any standard path Is 
not redirected It Is simply Inherited frow the 
shell; It usually opes to the terminal. 

The obi Illy to redirect the standard paths Is 
called device Independent I/O because paths can be 
directed to any device, not Just another device of 
the seme type as the default device for the path* 
The power of this feature Is easiest to see with a 
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few examples: 

0S9: list filename Is commend with no 
redirection. It lists the contents of the file 
celled "f f leneme" on the screen through the standard 
output path. 

0S9: list filename >/P lists the contents of 
filename on the device called /P, usually the 
printer. The single ">" at the end of the commend 
tells the shelf to redirect the standard output to 
the file whose name follows the >. I can't think of 
any reason for someone to want to put the output of 
the list command Into a disk file, but: 

0S9: list filename >lstffle does Just that. It 
puts the output of the list command Into a file 
named 1st file. If you ere using a multi-user system 
you can send the output of a command to another user 
with a command like: 

0S9: asm test. a I >/T2 which would send the 
listing fro* the assembly of test. a to the device 
called /T2, which Is usually a terminal . 

I redirect Standard Output more then the other 
paths, but there ere reasons to redirect the other 
paths as well. The Standard Input path Is the one 
which programs usually read from. A program can be 
fed a canned script of commends by redirecting Its 
Standard Input to a disk file with the commands In 
It. I sometimes Insert this command In my startup 
file: 

debug <startup. debug >/NL This runs the 
Mlcrowere debugger with Its Input coming from 
startup-debug, and Its output going to a special SCF 
device which 1 made public in the first column I 
wrote t/NL Is a null device — It makes anything you 
send to It disappear). By putting debug In my 
startup file like this I can easily apply patches to 
resident modules every time I boot my system. 

The Standard Error path Is used so Infrequently 
that It Is easy to forget that It exists* It Is the 
path which programs usually use for serious error 
messages. Usually, It Is a good Idea to leave the 
Standard Error path directed to the screen, but 
sometimes It should be redirected. Some compilers 
send syntax errors, or at least summery statistics 
out the Standard Error path. If you want to run a 
program that uses the Standard Error path In 
background while you edit In foreground. It Is wise 
to redirect the both the Standard Output and the 
Standard Error paths of the compiler to disk files 
or the printer, otherwise you may find messages from 
the compiler cropping up In the middle of your 
screen at awkward times. 

Redirection almost always works fine, but there 
ere some problems lurking around. It shouldn't be 
the responsibility of a user to watch out for these 
problems, but OS-9 Is designed with the assumption 
that programs will follow some conventions applying 
to their use of the standard paths- Some programs 
rely on dealing with particular devices. These 
programs should open special paths to those devices, 
but some use the standard paths for device dependent 
I/O. These programs should be avoided If possible. 

The typical OS-9 system comes with three types 
of flies. Sequential Character Flies, Random Block 
Files, end Pipes. Sequential Character Flies 
(usually called SCF flies) ere written or read from 
beginning to end. The most common SCF files ere 
Terminal Input end output, printer output, end modem 
Input and output. The bytes In a RBF file <fl1es 
handled by the RBFKAN file manager) can be read In 
any order. Disk files and other files like them, 
such as files In bubble memory or main memory, ore 
usually RBF files. There Is only one type of Pipe 
file, that Is a temporary file kept In main memory 
which Is used a buffer belween one program 1 s output 
and another program's Input. 



Unless a program concerns Itself wtth timing 
Issues or uses the more exotic GETSTAT/SETSTAT 
system service requests, there Is no way for It to 
tell the difference belween one device and another 
provided the devices ere of the some type (RBF, SCF, 
or Pipe). Some programs can't have their standard 
I/O redirected to a RBF file or a Pipe, but the 
great majority can. If a program uses SCF-speclflc 
GETSTAT/SETSTAT codes It will on ty be possible to 
use It with the proper type of files, but all but 
one of the programs that I know of from Mlcrowere 
and other major vendors can have their I/O 
redirected without restriction. The one exception 
Is Mlcroware's Pascal with old versions of OS-9. 
All programs written In that language. Including the 
compiler Itself, try to rewind their standard output 
file when It starts- The SCF file manager deals 
with this strange request correctly by Ignoring It, 
but the Pipe manager returns an error If anyone 
tries to rewind It. If you try to redirect the 
output of a program written In Pascal to a Pipe, the 
program will die as soon as It's started. Mlcrowere 
has a fix for this problem If you run Into It. 

Changing OS-9's Device Support 

The modular design of OS-9's I/O system allows 
new devices to be added and the support of old 
devices to be enhanced with the only restrictions 
being the wishes and budget of the person 
responsible, and the memory constraints of the 
computer. Support for I/O starts at the IOMAN 
module which fields each I/O system service request 
and sometimes does a little work before passing It 
off to the appropriate module. File managers 
Including SCF and RBF ere the next level down from 
IOMAN; they do most of the file handling work that 
Isn't specific to a particular piece of hardware. 
The device drivers, such as ACtA and PIA, handle the 
Interface with the 1/0 hardware. The device 
descriptor modules contain the directions which all 
these moo\Mes follow. There Is a descriptor for 
each device In an OS-9 system containing no 
executable Instructions, but lots of date which 
controls the other I/O modules. 

Hardware that requires complicated new modules 
for the I/O system should come with the necessary 
modules. The hardware vendor has to have the 
modules written tor write them), but a customer need 
only load the modules — normally by Including them 
In his boot — In order to add software support for 
the device to his system. This sets OS-9 apart from 
many operating systems In which a major part of the 
operating system has to be changed for any new 
device. 

Hardware vendors often need to write I/O 
modules In order to sel I their products to the OS-9 
community, but anyone can write I/O modules If the 
need or the mood takes them. Writing an entire new 
I/O subsystem would require a lot of work, but most 
problems can be solved with much less effort. Many 
devices can be accommodated by OS-9 without any 
serious programming at all by creating new device 
descriptors- Device descriptor modules specify how 
each device Is to be treated. The device descriptor 
contains fields which Indicate (to IOMAN) which file 
manager and device driver should be used for the 
device, an absolute physical address for the device, 
and any other data specific to the particular device 

The first 18 bytes of all device descriptors 
have the same format. The first nine bytes ore 
common to all module headers (Sync Bytes, Module 
size. Offset to Module Name, Type/Language (SFI), 
Attributes/Revision^ and Header Parity check). Of 
these, the module attributes ere most Interesting In 
the context of the device descriptor. If the device 
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descriptor module Fs marked reentrant, the device 
can be used by more than one process at a time; 
otherwise. It can only be linked to or opened by one 
process at a time- Device descriptors which are not 
reentrant are not only restricted to use by only one 
process at a time, they can't be linked to by debug 
of all If they are In the boot. Some devices, such 
as the printer, shouldn't be reentront unless you 
feel very ready to be responsible. OS-9 will 
happily mix output from several programs line by 
line on the printer If you tell It to. 

The format of the next nine bytes Is common to 
all device descriptors- The fields are: the offset 
to the File Manager name (e.g., RBF) for two bytes, 
the offset to the Device Driver name (e.g., ACIA) 
for two bytes , the mode (what the device can do, 
e.g. Read/W rite/execute) for one byte, the device 
controller's real address for three bytes, and the 
length of the Initialization table. 

After the first 18 bytes, different types of 
devices have different fields. The Initialization 
table which follows the byte with Its length 
contains most of the fields that are Interesting to 
play with. After the Initialization table there Is 
nothing but module names and the CRC# 

There ere eleven fields In the Initialization 
table for RBF-type devices (disk drives). The first 
field Is one byte long and contains a 1 Indicating 
that this Is a RBF device. The other fields ore: 

drive number 

step rate 

device type 

media density (0-slngle,t»double) 

number of cylinders (two bytes long) 

number of surfaces, verify (O-verlfy writes) 

default sectors per track for two bytes 

default sectors per track on track zero for two 
bytes 

sector Interleave factor 

segment allocation size The step rate can take on 
values of 0..3 with the higher numbers reflecting 
higher stepping rates. 

In the device type byte three bits ore 
significant. Bit zero Indicates a B" floppy If It 
Is one. Bit six tndlcates a non-standard format Is 
being used If It Is one. Bit seven being one 
Indicates that the device Is a hard disk. 

In the media density byte two bits ore 
significant. Bit zero = 1 Indicates that the device 
can handle double density. Bit one ■ 1 Indicates 
that the disk Is capable of double track density (96 
tpl). 

The fields In the device descriptor are 
Interpreted by the device driver and the file 
manager. Changing a value In the device descriptor 
can't force the other modules to do something they 
weren't written to do. For example. It probably 
Isn't possible to use the device driver which Is 
designed for floppy disks to control a hard disk — 
changing the device type byte won't change the 
capabilities of the device driver. It Is the option 
of the person writing the device driver to Ignore 
anything In the device descriptor he wants. This 
means that there Is no guarantee that the options In 
the device descriptor will work. I have heard that 
the floppy disk driver on the color computer Ignores 
many of the options, I'll confirm this when I get 
one. 

A different set of fields ore In the 
Initialization table for SCF devices. Host of these 
fields control the line-editing function of the SCF 
manager. These ore the values that ore temporarily 
set by 7W0DE- They can be set permanently by 



changing them In the device descriptor. 

The Inltlat Izetlon table In the device 
descriptor Is copied Into the path descriptor when a 
path Is opened. There It can be changed and read by 
GETSTAT/SETSTAT calls, but the change applies only 
to that particular path. Changes to the device 
descriptor becore the default for all paths opened 
to that device. 

The easiest way to change the device 
descriptors Is with debug. If, for example, you 
want to add a new terminal to your system which you 
don't have a device descriptor for, you can modify a 
similar descriptor with debug to fit your 
requirement (probably changing only the controller 
address and module name), save the result with the 
save command, and verify It with the update option 
to fix Its CRC. The resulting module can be loaded 
and used. 

A device descriptor can be modified even while 
the device It specifies Is In use because the 
descriptor ftself Is seldom referenced. In fact, as 
far as I know, the device descriptor Is only used 
when a path Is opened to the device. 

The device descriptor Is the controlling part 
of the OS-9 I/O structure. There ore several things 
that can be done with them that I haven't covered 
yet, but that will be material for other columns. 

C OHVER TING 



UNIFLEX TO 0S9 

The Conversion of Assemble r-Las^uage 

Motorola 6899 Application Programs 

From the UrxiFUOC operating System 

to the OS/9 Operating systor 

ty E. M. (Bud) Pass, Ph.D. 
CLuxxjter Systems Consultants, Inc. 
14S4 Latta Lane, Oarers GA 30207 
"telephone l*m**>r 404-483-1717/4570 

A previous article in this same series provided a set 
of guidelines, procedures* and concepts for the 
conversion of assembler -language application programs 
written for the FLEX operating ays ten to operate under 
the control of the OS/9 operating eye tan, 

litis article extends the discussion to include the 
conversion of asB&chter -Language programs written for the 
UniFLEX operating system to execute under the OS/9 
operating system. It does not repeat most of the 
information presented in the earlier article concerning 
OS/9. Thus, it may be necessary for the reader 
unfamiliar with the details of assembler-language 
programming in OS/9 to refer to that article or other 
information to be able to understand some of the tuuspta 
presented in thie article. 

The extent of the differences between UiiFL£X and 
OS/9 is far greater than the extent of the dlffismam 
between FLEX and OS/9, even though they both offer 
facilities externally similar to UNIX. This is true 
because of the carplex natures of both OS/9 and IJiiFLEX. 
Tttus, the suggested conversions will be less specific, in 
general* than those suggested for the conversion from 
FLEX to OS/9, and the manual conversions required may be 
s ome what sere difficult. 



IMdFLBC 
UniFLEX is one of several products of Technical 
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Systems Consultants, Inc. Another product of TSC is the 
FLEX operating system discussed in the previous artlrln 
in the series. 

UhiPLEX ie a operating system for Motorola 6699- and 
66000-based comjxjter systems. It supports full-size 
floppies and hai*d disks, with tree-structured directarif-a 
on each drive, along with CRT terminals and printers. It 
is reliable, well-auppjrted , and easy-to-use. 

UniFLEX supports up to 1M of RAH and IB bytes per 
drive of disk. UniFLEX is inherently multi-user and 
multi-tanking . It requires a mini/run of 96K {realistically 
128K-256K) for normal operations. 

UkUXCC OfMO LUC 

The UhlFLfiX carmand line is formatted as foUowst 

ccssswd Cpl3...Cpti C<ftiiJ CC>>ftio3 CVM tf] tt...) 

where t command is the name of the program to be 
exacotsr); 

pi... pi are crjmand parameters i 

<fin is a redirected standard input path; 

C>]>fho is a redirected standard output path; 

"»" indicates deletion of existing file; 

"pipe ie an indicator specifying pipeline 

processing; 

& is an Indicator specifying bac^rcaznd 
jlng; 



[;...] is multiple CDoraxla, executed left to 
ri^t. 

Parentheses may be used to force alternate gro^l/xj of 



UniFLEX THE, VMS 
A UniFLEX file name has the following formati 
C/dirl/.../d 



where: /dir 1/ . . . /dim/ is an cptuytal designation 
of the file's location in the UniFLEX 
tree-structured directory; 

Cilanane is a 1-14 character die name, 
starting with a letter. 

File names and directory names used in operands may 
also contain character sequences such as "*", "?*, 
"[..-]", acting as wild-card designates to specify 
(pmeibly) multiple riles without: providing crxiplete names. 
UniFLEX expands these ambiguous file names to lists of 
real file names before passing the cotmand line to the 
program being invoked. 

Both commands and file-names have the default 
position in the UniFLEX tree-structured directory 
specified at user log-on or by the last "end'* crxunand. 
Command a not found in the working directory and with 
names not starting with a slash are also looked for in 
the m /Un m and Vusr/bJn M directories. 

UniFlfiC «UA OWBSKBI PROBLEMS 

Since UniFLEX uses a disk format inccrx^tible with 
both 06/9 and FLEX, direct media ctTMsrsion from UniFLEX 
to 06/9 is not poaalble. 

Source-program and data files could be transferred 
over modems and telephone lines or over direct-ocmct 
serial lines. 

The 'writeflex' UniFLEX utiJity comund could also be 
used to convert the source-program and data files to 
FLEX format, and the 'of' program available fxtm LATO-CCXP 
could be used to convert the files fran FLEX format to 
OS/9 format. No FLEX eystem is required, except to 



format the diskettes used in the conversion process. Of 
course, the diskettes must be of compatible physical 
media for this process to work without the use of another 
system. 

UniFLEX PHiaWI XN7HTOCK SLSfftKY 

UniFLEX communicates with application programs in a 
manner somewhat similar to that used by 03/9 1 each 
request is a system call (swi3 on the 6699, trap on the 
68000), followed by a list of parameters. 

Each application program Das access to the full 64K 
byte of RAH address space, with program code normally 
loaded from the lower addresses and stack normally 
advancing from the higher addresses, each in 4K byte 
blocks. Unallocated rauixxry between the two limits is not 
accessible by programs, and neither are the I/O and DOT 
addresses. 

An application program may spawn additional tasks snd 
specify that they are to nn in intfciparelent, cmcurrant, 
or pipelined mode, and, in the letter two modes, monitor 
their progress and coipletion status. 

In case the demands on the system exceed the 
available memory space, UniFLEX will artrmtioally initiate 
task -swapping to the system residence device. Since 
UniFLEX programs are assumed non--p»iti£r>-lndtarJBXidBnt, 
they are always reloaded in the original logical 
space. 

When any task is initiated toy UniFLEX, the 
line parameters are passed in the stack, as represented 
ty the following diagramt 



parameter terminator 



$0000 (higher 



parameter 2 terminator $00 

parameter 2 ' , , . . ' <— 

parameter 1 terminator $00 I 

parameter 1 ' ' <«| — 

parameter terminator $00 I 

parameter '*«♦♦* <»1~* 

parameter list terminator $0000 ] 



parameter 2 pointer 
parameter 1 pointer 
parameter pointer 
-> parameter count 



I 



$xxxx ^™ 

$XXXX i ■ 

$xxxx ^^ 

$nnnn (lower addressee) 



Note that parameter zero in the diagram above is the 
name of the program being initiated. 

The format for a UniFLEX system call in UniFLEX 
assembler language is as follows i 

eye crxle£,t«iraX, . # . ,piranj 
where x code is one of the system call fcmrtirxis described 

balOWi 

it is interpreted as an B-bit call- code; 

peral thru paran are call parameters^ 

they are interpreted ae 16-bit values. 

In addition, parameters are passed between UniFLEX 
and the application program in the 0C, D, U, X, or V 
registers. In general, a system call of the following 
formats 

ays crxW^retfai. .*.,[nran 

would be equivalent to the following codes 

swi3 

feb code 

Wb paral 

i 
fdb paran 

where code and paral thru paran muet be cxnstants or 
given valuee eleewhere in the aeeembler program 
containing the UniFLEX call. 1?te nuitoer of parameter* 
for a given system call is always fixed, but the ase^^ier 
does not check for the correct number of argument e. 
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Since UnU'LEX Han no method of checking for the correct 
number of arguments for a given system call, it will 
return to the program at an offset specified by the 
system call code, not necessarily the actual number, with 
potentially disastrous results, in case of error. 

Ute UniPLEX assembler supports the specification of 
segmented code sequences. The text, data, and bas 
pseudo-operations are used for this purpose, as they are 
under uKDC. 

The text pseudD-opc ration spra-ifira the generation of 
(read-only) shared-text prograio-cobe and crustant^Sata 
areas whic'h may be shared by multiple simultaneous users 
of the same program. 

The data fwtfn rir Kyc ration specifies the generation of 
(read-write) initialized data areas. If a data eegroit is 
ussd by multiple simultaneous users, &atA\ has a separate 
copy. A data segment must start at the next 4K-byte 
address boundary after the end of the text se^nent. 

The bss pseudo-operation reserves memory but does 
not initialize it, serving a function similar to the data 
paeixkxjperation , 

The base pseudo-operation provides a temporary 
secondary program counter origin (like org) which may be 
used to help establish offsets and pointers but may not 
be used to generate programs or data code. 

UniFLEX uses a 512-byte disk sector format, with all 
512 bytes available for data storage. File linkage and 
allocation information is maintained externally to the 
user-accessible data records, removing the potential 
opportunity for destruction of file linkage information, 

LkiiFLEX WOJTIB 

Following is a list of the primary UniPLEX system 
calls, their code number a, and their descriptions: 

Oxle System c^ll Description 

00 ind(address) 

Psrfbrm an indirect system call 

01 indxO 

Perform an indexed system call 

02 exec( pathname, arglist) 

Execute a new program 

03 fbrk{) 

Fork a new task 

04 walt() 

Wait for a forked task to complete 

05 term( status) 

Terminate a task 

06 break (address) 

Adjust the data memory size 

07 stack (address) 

Adjust the stack memory size 
06 cpint( interruptnumbar, address) 
C^toh program intecrur* 

09 spin t(taskniiitsr, inter rupt^iflitsr) 

Send a program interrupt 

10 open (pathname, mode) 

Open a file for read or write or both 

11 create (pathname, permission) 

Create and open an output file 

12 read (filenumber,asxiress 4 count) 

Read from a file 

13 write (filenumber,adilress, count) 

write to a file 

14 seek(filenumbar,offsethi,offsetlo,type) 

tosition file pointer 

15 close(filenuntmr) 

Close a file 

16 dup(filenumbmr) 

Duplicate an oj^n file 

17 dups(filenumb^,sr«ifiednumber) 

Duplicate a file 

18 link(oldpathnamB,newpathnan«) 

Link to an existing file 

19 unlink ( pa thnams) 

unlink from a file (delete) 

20 crtsd ( pa thname.desc, address) 

Create a directory, etc. 



21 chdir( pathname) 

Change working directory 

22 lock(mode) 

Lock a task in main memory 

23 ohown(pathname,nerf»mer) 

Change file owner 

24 chprm( pathname, permission) 

Change file access permission 

25 chacc( pathname, permission) 

Check file access permission 

26 deface (permission) 

Set default file access permission 

27 of stattfilenunber, buffer) 

Get an opened file's status 

28 status (pathname, buffer) 

Get a file's status 

29 mount (devicepathname, pathname, mode) 

ttwnt a device 

30 unmnt(devioepathoame) 

Uirount a device 

31 crpipe() 

Create an inter-task pipe 

32 gtid() 

Get the task id 

33 guid() 

Get the user id 

34 suid(newuserid) 

Set the user id 

35 setpr (priority) 

Set running priority bias 

36 odata( address) 

Allocate physically contiguous mBrory 

37 prof il(pc, buffer, size, scale) 

Profile a running task 

38 trap(address) 

Set awi2 trap vector 

39 timB(buffer) 

Get the time 

40 stijne(timehi, timelo) 

Set the time 

41 ttime(buffer) 

Get tasks' s system tine information 

42 update () 

Update all system devices 

43 alarm (seconds) 

Wait for a specified time period 

44 stop() 

Stop tssk until interrupt 

45 ttyget(filenunber, address) 

Get terminal status and info 

46 ttyset(filenuwber, address) 

Set terminal configuration 

47 lrec(filenumber,size) 

Lock the specified file's bytes 
46 urec(filenumber) 

unlock the reoord 

50 eacct(fname) 

System accounting 

51 ttynumO 

Get TTY number 

52 filtim(fname) 

Set file time 

Following are the UniFLEX system call and control 
block definitional 

Number Name Description 



• Unifies system calls 



$00 ind 

$01 indx 

$02 exec 

$03 fork 

$04 wait 

$05 term 

$06 break 

$07 stack 

$06 cpint 

$09 spint 



Indirect call 
index indirect call 



fork 

wait 

terminate task 

exetend memory address 

grow stack 

catch program interrupt 

send program interrupt 
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$0* open open file 

$06 create create a file 

$8C read read file 

$0D write write file 

$0E seek seek to file position 

$0P close close file 

$10 dup duplicate open file 

$11 dupe duplicate specific file 

$12 link link to file 

$13 unlink unlink from file 

$14 crtsd make special or directory 

$15 chdir change directory 

$16 lock lock task in n^tory 

$17 chowi change file owner 

$18 chprm change access perm 

$19 chacc check access psi miss ion 

$IA deface set default access 

$1B of stat get open file status 

$1C status get file status 

$1d nount mount device 

$1E urwtit urrount device 

$1F crpips create pipe 

$20 gtid get tssk id 

$21 guid get user id 

$22 si) id set user id 

$23 setpr set priority bias 

$24 cdata request contiguous data 

$25 profil profile task 

$26 trap set ev/i2 trap vector 

$27 tlrtie get tiin» 

$28 stiine set time 

$29 ttin* get task tune 

$2A update update file systems 

$2B alarm sleep for bojib secx^ds 

$2C stop stop til interrupt 

$2D ttyget get tty status 

$2E ttyset set tty status 

$2F lrec lock file record 

$30 urec unlock file record 

$32 sacct system accounting 

$33 ttynum get tty number 

$34 filtim set file access time 

* System error definitions 

$01 EIO io error 

$02 EFAULT system fault 

$03 EDVOF data section overflow 

$04 ENDR not a directory 

$05 EDPUL disk full 

$06 PHMFL too nany files 

$07 eaADF bad file 

$06 B»FL no file 

$09 EMSDR missing directory 

$0A EPRM file permission 

$0B €fix file exists 

$0C EBAflG bad argument 

$0D ESEEK seek error 

$CE exnev crossed devices 

$0T ENBLK not a block special file 

$10 EBSY device is busy 

$11 OMIT file not mounted 

$12 EBOEV bad device specified 

$13 EAfCC too many arguments 

$14 EISOR file is a directory 

$15 EN7TB file not binary 

$16 EBBIG binary file too big 

$17 ESIOF stack overflow 

$18 EN3JD no children living 

$19 ETKre too many task* active 

$1A BBTO, bad system call 

$1B EltfTR interrupted system call 

$1C Q/TSK no task found 

$1D Qfrrr not a tty 

$1E EPIPE write to broken pipe 

$1F ELDCX record locking error 

* svtftsm interrupt definitions 
$01 HANG I hangup interrupt 



file 



$02 


IB7TI 


$03 


OilTI 


$04 


EHTI 


$05 


KILUt 


$06 


WPIPI 


$07 


BAfCI 


$0B 


TIWCI 


$09 


Ti>ei 


$0* 


AliWI 


$0B 


TEW1I 


$0C 


UKERI 
* f 1 1< 


$00 


S2 TOP 


$00 


st dev 


$02 


st fidn 


$04 


st mod 


$05 


st_j>no 


$06 


st cut 


$0? 


st own 


$09 


st siz 


$0D 


st nttm 


$11 


st spr 


$15 


ST SIZ 



$00 

$03 
$06 
$0* 
$«2 



$00 
$01 
$02 
$03 
$04 
$05 
$06 



$01 
$02 
$04 
$06 
$10 
$20 
$40 
$80 



keyboard interrupt 

quit interne* 

emt interrupt (ewi) 

kill tusk interrupt 

write broken pipe interrupt 

bad argument interrupt 

trace interrupt 

time limit interrupt 

alarm interrupt 

termination interrupt 

user-^le fined interrupt 



* file status block structure definition 



save current pc 
device number 
fdn number 
file node* 
permission bits 
file link aount 
file owner's user id 
file size in bytes 
last nod if led time 
spare - future use only 
size of status buffer 



$02 PSfiLK block device 
$04 FSQtR character device 
$08 FSOIR directory 

* psrmissions 

$01 FM3JR owner read permission 

$02 faojw owner write permission 

$04 PACUE owner euzute permission 

$08 FA03R others read permission 

$10 FACTJN others write permission 

$20 FACDfi others execute permission 

$40 FXSET set id bit for execution 

* 'time' buffer 



$00 tin sec 

$04 tnTtik 

$05 tm eon 

$07 tnTdet 

$08 itTsiz 



time in seconds 

ticks in second (tenths) 

time zone 

daylight savings flag 

time buffer size 



* 'ttime' buffer 

ti_usr task's user time 

ti"sys task's system time 

ti_chu children's user time 

ti cha children's system time 

TIJS1Z size of ttime buffer 

* b\iffer definitions for 'ttyset' and 'ttyget' 

tt fig flags 

ttjdly delays 

tt_cnc line cancel character 

tt_bka harkspann character 

tt~spd terminal speed (not used) 

tt_spr spare - future use only 

TTJSIZ size of tty buffer 

* flags 

RAN raw i/o mode 

EQ© echo input characters 

XTABS expand tabs at output 

LOSE map upisr to lower case & vice versa 

Cisco output cr and If for cr 

BSEQJ output backspace echo character 

SQfR single character input mode 

C27TRL ignore control characters 

06/9 QDOSBBRB RR UnlPLSC fHXSMC 
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The UniFLEX system calls and corresponding control 
block descriptions are always found within a UniFLEX 
assembler language program. Most of the considerations 
discussed for the conversion of FLEX programs to 06/9 
also apply to the conversion of UniFLEX programs, in 
addition to some other considerations not already 
discussed. 

Of course, each 05/9 executable module must contair a 
module header and trailer, possess position-independent 
code and data, use 6809, not 6800 mnemonics, etc., as 
discussed for FLBC programs. 

Many UniFLEX programs have additional assembler- 
language constructs which must also be converted to 06/9 
assembler-language. The simplest are the names of the 
common source libraries such as "sysdef", which are 
stored in the w /lib M directory. These libraries provide 
standard symbolic labels tor the LTdFLOC system call codes 
and control blocks. 

UniFLEX supports segmented programs, which involve 
the use of shared program code. However, the programmer 
must designate to the assembler which portions of the 
program are shared code, initialized data, and 
uninitializoJ data, 'this is done with the text, data, and 
bss pseudo-opcodes. Since OS/9 automatically shares 
program text, the text pseudo-opcode may be safely 
dropped. Since OS/9 does not initialize the assigned 
data space, the bss portion may be used directly, but 
must be combined with the data portion, if any, and 
program orxie must be added to cop/ th«? former initialized 
data areas into the 06/9 uninitialised data space. 

06/9 MPLfl-ttNTMTCN OF UniFLEX SYSTM CALLS 

This section discusses the conversion of the (JiiFLEX 
system calls and control blocks to 06/9 format. Almost 
all of the commonly- used UniFLEX system calls have 
corresponding OS/9 system calls, and almost all of t>ite 
commonly-used UniFLEX control blocks have their 
corresponding 0S/9 control blocks. However, 
"corresponding*" does not mean "identical 1 *. Ttiere are no 
one-to-one correspondences among any of the UniFLEX and 
0S/9 control blocks, and there are very Sew one~to-one 
corresfiTidercBS among the system calls. 

ITie error and interrupt number codes have different 
meanings and values on the two systems; however, most of 
the differences are simple to resolve with an editor or 
with a cross-reference equate file, providing the 
equivalent 0S/9 values for the UniFLEX symbol names . 
Roth systems use the carry bit set to Indicate an error 
condition during the invocation of a system call. UniFL£X 
uses the D register to return the error number, wteceaa 
OS/9 uses the B rec^lster; even though the error numbers 
are different, they will still be in the B register, and 
the same values will usually be in the D register, since 
the A register is cleared under most of the suggested 
conversions . 

Following are the UhiFLEX system calls and suggested 
05/9 conversions. As in the case of FLEX, many of the 
call conversions may be grouped together into a library, 
or they may be placed at the point of each call. If they 
are grouped, some of the suggested conversions must be 
madififlJ, as they use parameters not in registers. 

Systero Number and Call 
Description 

OS/9 Conversion 

00 ind (address) 

Perform an indirect system call 

This system call has no direct OS/9 equivalent 
conversion without the use of an interpreter? 
usually, another specific UniFLEX system call 
is being made and may be substituted for the 
indirect system call. 

01 indxO 

Perform an indexed system call 

This system call has no direct 05/9 equivalent 
conversion without the use of an interpreter; 
usually, another specific UniFLBC system call 
is being made and may be substituted for the 



indexed system call. 

02 exec ( pathname. arg list) 

Execute a new program 

UniFLEX arguments are indirectly referenced 
thru a list of addresses in the stack, all 
terminated with a hex zero address, and each 
argument is terminated with a hex tero byte? 
OS/9 requires the parameters to be a string of 
characters, separated by spaces, and 
terminated with a carriage return. 

pshs x,y, u 

leay §08, s command file name 

ldb #§20 
paraadr ldx ,y++ 

beq paraend 
paralop Ida ,x+ parameter terminator 

hue paralop 

stb -§01, x 

tfr x.u 

bra paraadr 
paraend ldb #§0d parameter area end 

stb /U 

pshs u 

ldd §08, s 

subd ,s++ 

tfr d,y parameter si see 

leau §0a,s parameter area 

ldx §08; s program name 

clra language/type code 

clrb data pages 

os9 FSOiain 

puis x,y,u 

03 forkO 

Fork a new task 

UniFLEX starts a new task with the fork system 
call by corying the caller's program image to a 
new area, then initiating both the old and new 
tasks, with the old task returning two bytes 
past the end of the system call with the 
child's task id in tlte D register; OS/9 starts 
new tasks with the F§Fork system call, which 
has parameters as described for the F§Chain 
system call. 

04 waitO 

Wait for a forked task to complete 
pshs x 
clra 

os9 F$Wait 
bes waiterr 
tfr d,x 
clra 
exg d,x 
tfr a,b 
clra 
waiterr pils x 

05 term(status) 

Terminate a task 

os9 F§Kxit 

06 break(address) 

Adjust the data memory size 

UniFLEX allocates memory very differently from 
OS/9 Level I and Level II; the closest 0S/9 
system call is F§Mem, which allocates memory 
toward higher addresses above tbe stack, 
whereas UkiFLEX allocates additional data specs 
above the program and data space, toward tlte 
stack . 

07 s tack( address) 

Adjust the stack roenory size 

UniFLEX allocates memory very differently from 
0S/9 Level I and Level II; the closest 0S/9 
systsm call is F§Mem, which allocates memory 
toward higher addresses above the stack, 
whereas UniFLEX allocates additional stack 
space toward lower addressesj below the stack. 

08 cpint( inter cuptnumber, address) 

Catch program interrupt 

UniFLEX program interrupt handling is quite 
different from OS/9 program interrupt handling; 
the corresponding 05/ 9 system call is F§lcpt, 
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which handles All program interrupts once 
established, whereas the UniFLEX system call 
handles only one class of program interrupts 
per invocation: both return with "tt± m . 

09 5pint(tasknuitoer f interruptnuTfbfir) 

Send a program interrupt 

iniFLOC and 06/9 internet codes are different, 
as noted earlier. 

tfr b,a task number 

ldb tinterruptnanber signal code 

os9 F$Send 

Ida #$00 

10 open( pathname, mode) 

Open a file for read or write or both 

UiiFLEX file names are delimited by trailing hex 
zero bytes; OS/9 file names are normally 
delimited by a high-order-bit set on the last 
byte of the file name; however* 06/9 seems to 
accept the UniFLEX convention, probably since 
the UniFLEX convention is identical to that 
used by the C coolers under both systems . 

pahs x 

Ida t(moden) 

tfr a,b 

I olb 

lslb 

I sib 

pshe b 

ora ,s+ 

leax pathname, per (or ,u — ) 

oe9 I$C*>«n 

bec Of^nok 

tfr a,b 
openok Ida #$00 

puis x 
U create(pathnamB,permiB8ion) 

Create and open an output file 

UhlTLCX file nanus are delimited by trailing hex 
zero bytes; OS/9 /lie names are normally 
delimited by a high-order-bit set on the last 
byte of the file name; however, OS/9 seems to 
accept the UniFLEX convention, probably since 
the UnlPLEX convention is identical to that 
used by the C compilers under both systems: 
UniFLEX automatically deletes already-existing 
files, but OS/9 does not do so automatically. 

r«ha x 

ldb IpenalssiOfi 

tfr b,a 

Ida #$03 read/write 

leax pathname, per (or ,u ...) 

os9 I$Create 

bec creatoX 

tfr a,b 
create* Ida #$00 

12 r^a^ea^rvjrtir,SSnjss, count) 
Read from a file 

UniFLEX allows the program to partially control 
the actions of the read system call thru 
certain bits i*\ the flag byte parametei 
(tt_flg); the input options controlled by this 
parameter are; raw I/O, echo input, map case, 
echo backspace, single character, ignore 
control characters? OS/9 controls raw I/O with 
I$Read or I$fteadLn calls and some of the other 
options with path descriptor parameters: 
UniFLEX returns zero bytes and no error 
indication on end of file, whereas 06/9 returns 
E$BQF error code. 

F«hs x,y 

tfr y,d 

tfr b,a 

ldy tcount 

leax address, u (or ,s . ..) 

os9 I$Read (or IS&eadLn) 

Ida #$00 

bee readok 

tfr y,d 
readok puis x,y 



13 write(GIenumbex, address, count) 

write to a aie 

UniFLEX allows the program to partially control 
the actions of the write system call thru 
certain bits In the flag byte parameter 
(ttflg); the output options controlled by this 
parameter are: raw i/o, expand tabs, map case, 
auto line feed; OS/9 controls raw I/O with 
I$Read or I$ReaclLn ca))a and some of the other 
options with path descriptor parameters* 

peha x,y 

tfr y,d 

tfr b,a 

ldy # count 

leax address, per (or ,u ...) 

os9 l$Write (or I$WritI«) 

Ida #$00 

bes writok 

tfr y,d 
writok pula x,y 

14 seek (filenumher,of^Bethi,o£rs^Uo, type) 

K>sition file pointer 

UniFLOC has the following three base points for 
the seek calls beginning of file, current 
position, end of file, and returns the 
resultant position in the file; the 06/9 eeek 
call is always from the beginning of the file, 
and the getstat call is used to determine the 
position within the file, 
pahs d,x,y,u 

tfr u,y 

ldb I type 
beq seekD 

aipb #$01 

beq seekl 

empb #$02 

beq seek2 
seek0 ldx #$0000 beginning 

ldu #$0000 

bra seek it 
seekl ldb #$05 current 

os9 I$GetStt 

bes seekerr 

bra seekit 
eeeX2 ldb #$02 end of file 

os9 I$Getstt 

bes seekerr 
seekit tfr u,d 

ackli #offsetlo 

tfr d,u 

pone x 

lcki #offsethi 

adeb $01; s 

adca ,e++ 

tfr d, x 

Ida $01,s 

os9 I$Seek 

bes seekerr 

ldb #$05 

os9 I$GetStt 

bes seekerr 

stx $02,s 

StU ,8 

bra seekax 
seekerr Ida #$00 seek error 

std ,s 
seekax puis d,x,y,u 

15 close! filenumber) 

fines a file 

tfr b,a 
os9 I$Close 
Ida #$00 

16 dupffHenuiter) 

ft lpl Irate an open file 
tfr b,a 
os9 I$Dup 
Ida #$00 

17 diS3B(filenumbar,^yrifiadnA«rryr) 

explicate a file 
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1*te nearest os/9 equivalent does not allow the 
calling program to specify the file descriptor 
of the newly created file. 

tfr b,a 

oe9 I$Dup 

Ida #$00 
Ifl lihK(oldpat?inanK,newpathnafl») 
Link to an existing file 

UniFLEX supports the concept of a link file, 
which is not an actual file, but provides a 
pointer to another file, which is then used as 
if it were the link file; OS/9 does not 
support such a concept, 

19 unlink(pathname) 

Uvlink fern a file (delate) 

UniFLEX has only the working directory; os/9 
has both the data and execution directories, 
and allows the deletion of files from either. 

pahs x 

leax pathname, per (or ,u ...) 

tfr b,a 

os9 I$Delete (or I$DeletX) 

Ida #$00 

puis X 

20 crtad (pathname, deec,addrese) 

Create a directory, etc. 

UniFLEX allows the creation of block or 
character ievices or of directories with this 
system cull; OS/9 allowu only the creation of 
directories with the closest equivalent system 
call. 

pens x 

leax pathname, per (or ,u ...) 

ldd #deec 

empa #$08 make sure directory 

beq crtsd 

orcc #$01 set error 

ldb #$ESUTikSVc 

bra crtader 
crtad and*> #$3f reset id bit 

os9 iSHaXDir 
crtsder Ida #$00 

puis x 

21 chdLr (pathname) 

Change working directory 

UniFLEX has only the working directory) 06/9 
has both the data and execution directories, 
pahs x 

leax pathname, per (or #u . ..) 
Ida #$03 (or $04 Sor execution dir) 
os9 I$Chgdir 
Ida #$00 
puis x 

22 lock(mDde) 

Lock a task in main memory 

06/9 has no equivalent to this system call* 

23 chown (pathname r oewjyner) 

Change file owner 

0S/9 has no direct equivalent to this system 
call. 

24 chfrmfpathnams, permission) 

Change file access permission 

06/9 has no direct equivalent to this system 
call: in 06/9, the 'attr* connand may be used to 
change the file's access permissions. 

25 diacctpathnamB, permission) 

Check file access perndsslon 

06/9 has no direct equivalent to this system 
call; in 06/9, the 'attr' command may be used to 
determine the file's access permissions. 

26 dafecefpermiseion) 

Set default file access permission 

06/9 has no direct equivalent to this system 
call; in 06/9, children tasks inherit the open 
Glee of the parent task, so default file access 
permissions are meaningless. 

27 QfietatfeUenumber, buffer) 

Get an opened file's status 

06/9 has no direct equivalent to this system 
call; in 06/9, the 'attr' command may be used to 



determine the file's access permissions, and 
the I$0etStt system call may be used to 
determine file size and other file parameters. 

26 s tat us (pathname, buffer) 
Get a file's status 

06/9 has no direct equivalent to this system 
call; in 06/9, the 'attr' command may be used to 
determine the file's access permissions, and 
the I$GetStt system call may be used to 
determine file size and other file parameters. 

29 raDunt(de*dcepathname, pathname, mode) 
Mount a device 

OS/9 has no direct equivalent to this system 
call; in 06/9, devices are always designated by 
the device name, not by an LvHrect directory 



30 unrmt(devicepathname) 
Unmount a device 

0S/9 has no direct equivalent to this system 
call; in 06/9, devices are always designated by 
the device name, not by an indirect directory 



31 crpipeO 




create an inter-task pipe 




06/9 has no direct equivalent to this system 




call; in 0S/9, pipes are created by the shell 




process, not within application programs. 


32 


gtidO 




Get the task id 




pahs y 




os9 F$I0 




bec gtidofc 




tfr a,b 




gticV* Ida #$00 




puis y 


33 


guid(> 




Get the user id 




pahs y 




os9 F$ID 




bec guicok 




tfr y,x 




tfr y,d 




guide* Ida #$00 




puis y 


34 suid(newuserid) 




Set the user id 




Only 06/9 Level II allows the F$SUser system 




call. 




pehs y 




clra 




tfr d,y 




os9 F$SUser 




Ida #$00 




pule y 


35 


setpr(priority) 




Set running priority bias 




The UniFLEX system cell setpr specifies a hies 




value; the OS/9 system call F$Sprior sisdfies 




the process priority value directly. 




pshs x,y 




tfr a,b 




clra 




tfr d,x 




os9 F$ID 




bes setprer 




pelts a 




tfr x,d 




puis a 




o*9 e$sprior 




setpxer Ida #$00 




puis x,y 


36 odata(address) 




Allocate physically contiguous memory 




UhiTLEX allocates memocy very differently fron 




OS/9 Level I and Level II; the closest OS/9 




system call is F$Mem, which allocates mansry 




toward higher addresses above the stack, 




whereas uni£L£X allocates »<*H»inrtAi data space 




above the program and data space, trfcird the 




stack. 
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37 profild*:, buffer ,si2e,soale) 

Profile a runAiAg task 

06/9 has no equivalent to this system call. 

38 trap< address) 

Set owl 2 trap vector 

Since programs running under control of OS/9 
use swi2 for system calls, evL2 nay not be used 
fbr other pir|*>ses by program; hovever. avi or 
swi3 may be used; the OS/9 system call does 
not return the pcevioua swi or swi3 address. 

pahs x 

Ida |$01 (or $03 for swi3) 

leax address, per {or , u . . . ) 

c#9 P$SSW1 

Ida #$00 

pila x 

39 time(buffer) 

Oet the LLn>' 

UniFLEX returns the time in seconds and ticks 
from 0000 January It I960 UTC; OS/9 returns the 
time in yaars, montha, days, hours, minutes, and 
seconds from 0000 January 1, 1900 UTC, in a 
buffer, one byte for each iten. 

pslia x 

leax buffer, u (or ,s ...) 

os9 F^Tinie 

Ida l$00 

pila x 

40 stimettlmehi.tlmelo) 

Set the time 

UniFLEX retpiires the time in secrads in X and D 
from 0000 January I, I960 UTC; OS/9 requires 
Uw time in years, months, days, hours, minutes, 
and secokta rron 0000 January 1, 1900 (TIC, in a 
buffer, one byte for e*cn itan. 

pehs m 

leax buffer, u {or ,s ) 

os9 FSSTune 

Ida |?00 

puis x 

41 ttime (buffer) 

Get tunks's system time information 

OS/9 has no equivalent to this syston call. 

42 updateC) 

Update all system devices 

OS/9 has no equivalent to this syston call. 

43 alarm( seconds) 

Wait Cor a specified tune period 

OS/ 9 has no equivalent to this system call; an 
independent task could be generated which, 
after a specified number of seconds, generates 
an interrupt to the calling task and 
terminates. 

44 stop() 

Stop task untiL interrupt 
pshs x 
ldx #$0000 
os9 FSSleep 
Ida f$00 
pila x 

45 tty9et(eOenumber,address) 

Get terminal status and info 

UnlFUDC returns terminal status and information 
in a six-byte area called ttbuf; OS/9 returns 
sore? of the terminal option information in a 
32-byte area which is a copy of the option 
section of the path Aaatxiptor and it returns 
the terminal status flag as a separate byte, 
with separate calla to the l$GetStt system 
call. 

46 ttyset(Qle/*nt*r, address) 

Set terminal configuration 

UniFLEX requires terminal status and 
information in a six-byte area called ttbuf; 
OS/ 9 requires some of the terminal option 
information in a 32-byte area which is copied 
into the cption section of the path descriptor 
with a call to the I$SetStt system call. 



47 lrec(&leni*tser,eixe) 

tock the Bfvrifiprt file's bytes 

OS/9 Level II locks the last recocd read in a 
file opened for update; this method is not 
directly compatible with the method used by 
UniFLEX, which allows the user to specify the 
range of bytes within a file currently being 
locked} txrth systems allow only one active lock 
per file. 

46 urBc(eU*TUIT*KT) 

UUock t)w record 

OS/9 Level n locka the last record read in a 
file opened for update; this method is not 
directly compatible with the method used by 
UniFLEX, which allows the user to specify the 
range of bytes within a file currently being 
locked} both systems allow only one active lock 
per file. 

50 sacct (frame) 

system accounting 

OS/9 has no equivalent to this system call. 

51 ttynun() 

Get TIY nurrtoer 

OS/ 9 has no equivalent to this systen call. 

52 EUtimCfoame) 

Set file time 

OS/9 ttas no equivalent to this eysten call. 

SWAKY 

This article, like the first in the series, has 
attempted to provide a framework for the conversion of 
UniFLEX assembler application programs to operate isrier 
the OS/9 operating system. 

It discussed the different and additional 
requirementa placed on programs which run index OS/9, 
and suggested equivalent OS/9 system calla for many 
IftifLEX system calls. 

Although UniFLEX and OS/9 are externally similar 
operating systems, they are internally quite different and 
are both very complex. Therefore, the suggested 
conversions from UniFLEX are far more complicated and 
incomplete than they were from OS/9 in the earlier 
articLe in this series. 

With the information provided in the two articles in 
this series, a programmer tamilLir with assembler Larcru&gs 
for OS/9 and FLEX or UniFLEX should be able to convert 
assembler language application programs from FLEX or 
UxifLEX to OS/9. 
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Note: Many of the Items publshed under the BIT 0UfJC£T 
column were voted the most useful by many readers. These 
tetters* hints and kinks, suggestions and even sometimes 
(not often) gripes are what has directed us In our 
selection of articles each month. 

We have attempted to select subject matter In 
relation to the percentage of different readers 
Interest- However, It seems that some subjects hove 
more reader Interest, than we hove received submlslons 
from you. If we are to publish articles on subjects you 
are Interested In, then we need romr fflpvt. U nlike most 



magazines, 68 MltRO JOURNAL IsTOUR MGAZHGB This 
means that you the reader determines what we publish. 

We forfeit thousands of dollars of advertising 
revenue each year because we screen advertised products 
to Insure that they perform as e m u rt lsed* Some f bad 
apples' nave slipped Through (not many!). However, having 
tested (we order under an 'assumed' name many Items nor 
advertised In 6B MICRO JOURNAL) products advertised In 
other magazines, we haved decided to continue our 
screening requirements- There are other products that 
are advertised elsewhere (a very few) that are Indeed 
excellent products. Therefore, It should not be assumed 
that just because It Is not advertised In 68 MICRO 
JOURNAL It Is of questionable quality. I am referring of 
course to products pertaining to the type computers 
that 68 MICRO JOURNAL Ts all about. 

So If we are to continue to serve you as we have for 
the past five years plus, then I need your Input on this 
also. If you have purchased a real 'lemon* let me know. I 
can assure you we will keep It on file and use the 
Information accordingly. Of all the different qroups of 
computers (Radio Shack, Apple, Coromadore, IBM (personal) 
etc.) we have less complaints with our advertisers, than 
any of the others. We sure do not claim perfection, but 
1 can assure you that you can place more faith In 
advertising In 68 MICRO JOURNAL, than any other computer 
magazine I we have received hundreds of pounds of letters 
stating as much, from you the readers. 

DMW 

DYNAMITE 
REVIEW 

By: Peter Dibble 
517 Goler House 
Rochester, NY 14620 

Review of Dynamite 
Overview 

Dynamite Is a disassembler for the 6809/6800 
sold by Computer Systems Center. The version 1 
tested runs under 0S~9, but there are other versions 
for FLEX and UnlFLEX. Disassemblers are able to 
convert a file of executable object (machine) code 
Into a program In assembly language. It Is 
Important to realize that Dynamite won't work on 
Intermediate code, such as BaslcOQ packed files, and 
It won't always convert object files Into the 
original language. Dynamite can convert an 
executable object module generated by any language 
Into assembly language. Even If the program was 
written In a higher level language like Pascal or C, 
Dynamite will only produce assembler. 

If you have reliable software and don't like to 
dig around In your system much, you have no need for 
Dynamite. Don't naste your money. If you would 
like to fix (modify) your software, or Just want to 
understand It as only someone with the source code 
can, Dynamite, or some other disassembler. Is 
valuable- 1 have disassembled many pages of code by 
hand. Those hours of work qualify me to say that 
disassembly Is Just the type of work which should be 
left to computers- 

Some Detal Is 

Dynamite can be used to get a quick look at 
source that could have generated an object file. 



The command: 

DYNAMITE filename a wll I disassemble the module In 
the file called filename and send Its output, which 
looks like the the output of an assembler, to the 
terminal. The "a" option tells Dynamite to give the 
ascll equivalent of each printable character It 
encounters during the disassembly- This simple 
disassembly Is enough In many cases. If the module 
Is more complicated than Is easy to understand 
without meaningful labels, the next step Is to help 
Dynamite do a better Job of decoding the module 
until Its output Is understandable. 

Some Detal Is 

Dynamite doesn't distinguish between data and 
Instructions while disassembling. This results In 
some very strange output as blocks of constants are 
disassembled. Even the name of the program pointed 
to In the module header Is decoded Into assembly 
language Instructions. The "a" option makes It easy 
to find the data areas, and Dynamite can be told 
where they are either through Its standard Input or 
In Its command file. Once Dynamite knows where the 
data areas are. It will stop disassembling them as 
Instructions. Instead, It will label the entries In 
the data area, and disassemble them into constants 
(fcb,fcc, ...). 

When Dynamite Is run without any guidance, It 
Invents names for everything It encounters that 
might have had a name In the original program. 
Addresses, offsets, and Immediate data all are given 
names. Names for Immediate data and offsets are 
useful. Names for offsets in PCR instructions ore 
VERY useful because, although different references 
to a location will have different PCR offsets. 
Dynamite resolves them to the same name. 

An assembly language program more than about a 
page long Is hard to read unless It has meaningful 
names. Dynamite gives names that consist of a 
letter and a number. More meaningful names can be 
assigned by using a label file. 

Dynamite can use two classes of files with 
label definitions In the form of equates. It always 
uses a "system name" file which contains the names 
usad for each 0S9 call. When the Instruction: 

0S9 ISOpen 
Is decoded the "ISOpen" comes from the system name 
file. The second file full of label definitions Is 
the "label file." The label file's name has to be 
given In the Dynamite command line. Each line In 
the label file Is of the form: 

label EQU value class 
for example: 

Inlt EQU $24 L - 
Where Inlt Is the label, (24 Is the value and "L" Is 
the class. Initially eight label classes are 
def Ined: 

Direct references 
L PCR references 

X Extended references 

t Hex constant 

& Denial constant 

£ Decnal or Hex constant depending on lagnitude 

* ASCII constant 

1 Systei function naie 



These classes ore sufficient for a simple 
disassembly, but I found myself defining additional 
classes very soon. A class Is defined by putting 
some labels In the label file with that class. All 
the unused letters A..Z can be used as new classes- 
For example, when I disassemble modules from 0S-9. 
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I usually have to define labels for offsets In the 
System Direct Page, and the process descriptor- For 
the System Direct Page the D class Is fine, but for 
the process descriptor 1 have to define a new cfass+ 
I usual fy use P. 

Dynamlte will use Its default classes of labels 
wherever they are appropriate unless It Is given 
Instructions to use another class of label- A good 
disassembler needs to be able to assign labels to 
values very specifically. Although 8 Is the offset 
of the PSUser In the process descriptor control 
block. It wouldn't generally be a good Idea to 
assign the name PSUser to the value 8 throughout a 
program. Dynamite gives you two ways to limit the 
scope In which a label Is used. A class of label Is 
activated by a command of the form: 

<mode> <class> t<offset>l <range> 
The mode Is one of: 



II - one byte inediate (any register) 

ID - Inediate «ith Accumulator D 

IX,tY,IU,IS - Iwediate with other registers 

X^U.S - Indexed by *,Y>U, or SP 

D - Direct page 

E - Extended addressing 

H - Relative 



The class Is a default class, or one defined In the 
label file. The offset is added to a value before 
the proper label Is looked up, then Included In the 
disassembly listing. This would be used to generate 
Instructions like: 



Ida iCRtlBI 



In the disassembly. The range gives the range of 
offsets from the start of the modute being 
disassembled over which the mapping given by this 
command Is In effect* 

Commands can come either from standard Input 
after Dynamite Is started, or from a command file. 

If the reason for disassembling a module Is to 
learn how It works, the listing generated by 
Dynamite should be enough, if the goal is to revise 
the original program, Dynamite can generate a file 
which contains source which can be assembled with 
the Mlcroware standard assembler, or any compatible 
assembler to give a module identical to the 
original . 

The OS-9 version of Dynamite expects to 
disassemble 6809 instructions from a file with 
modules In OS-9 format, but there Is an option which 
causes It to disassemble a file Into 6800 
Instructions and another option which tells It to 
expect to find the module In Motorola or FLEX format 
Instead of the usual OS-9 format. 

Operation 

1 use Dynamite to sort of chew away at the 
edges of a program until I have It reduced to an 
understandable listing. First I let Dynamite have 
Its head, and produce a listing using all Its 
defaults. Using this listing, I start bufldfng the 
labels and commands files* At first 1 Just define 
the data areas and a few labels. Then I 90 through 



a cycle of running Dynamite then using the output to 
refine and extend the contents of the commands and 
labels files until the listing satisfies me- Then I 
ask Dynamite to generate a file with the source In 
It. This f I le Is the best 1 can do with Dynamite. 
It Isn't well formatted, and has no comments. The 
final polishing has to be done with an editor. 

Please realize that If you disassemble 
proprietary software (such as Dynamite Itself) the 
same laws and moral obligations that should prevent 
you from passing out copies of the original program 
apply to the disassembled program. 

Limitations 

When I first tried to use Dynamite, 1 had a 
terrible time. I blamed the documentation. 
Determined not to be unfair, 1 sat down and read the 
manual from start to finish. 1 won't say It was 
easy reading, but once I had chewed my way through 
It I understood how to use Dynamite. The manual Is 
a little brief for the manual of a program that does 
such tricky work, but It is complete. It Is not set 
up to be skipped through! 

Dynamite's advertising might lead a person to 
believe that disassembling a module with Dynamite Is 
easy. You run Dynamite against a file and It falls 
apart Into neat code- This Is not true at all... 
disassembling a modute Is hard. You have to figure 
out all the tricks the person who wrote the program 
used. This Is not too hard to do for a short, 
simple program, but long tangled modules are much 
harder to disassemble than they are to read In 
commented source form, and some modules are hard to 
understand even when the original source Is In front 
of you. 

It seems 3 little silly to design a 
disassembler with the ability to Insert comments In 
Its output, but Dynamite Is such a complete product 
that 1 am a little disappointed that there Is no way 
to Include a "comment file" In the Input for 
Dynamite. I understand that Computer Systems Center 
Is working on this shortcoming* 

Summary 

I am very Impressed with Dynamite. It does 
about as good a Job of helping a person to 
disassemble a module as It can do. For example, If 
Dynamite finds that a label falls In the middle of 
an Instruction, It throws In an ORG to adjust the PC 
so the label falls at the start of an Instruction. 
This keeps data areas from throwing the disassembly 
out of whack; usually If there Is a data area In a 
program, there Is a reference to the first 
Instruction after the data area which Dynamite can 
use to get Itself lined up again If It hasn't been 
told that the data area Is there and has gotten 
Itself wrapped around the axle by trying to turn 
data Into Instructions. 

Dynamite Is designed to be useful for several 
different types of disassembly. The quick 
disassembly can be done without building any files. 
The most Important Information can be supplied 
Interactively. Used this way Dynamite can produce a 
usable listing In Just a few minutes. The full 
power and flexibility of the program shows up when a 
higher quality listing Is the goal. Dynamite lends 
Itself to the process of successive refinements that 
leads to a clear disassembly. 

1 don't recommend Dynamite for every OS-9 user* 
In fact, I Imagine there are not many OS-9 users 
who have a need for this type of software, but for 
those who need a disassembler. Dynamite Is 
everything It should be* 
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Joe Gbttschall 
1712 Leisure Lane 
Glen Burnle, MD 21061 
(301) 761-1151 



Enclosed fs a utflfty program called 'PACK**- It fs 
a useful utility that will move all free sectors on a 
dfsk to one contfguous lump at the end of the dfsk. 
It wfll keep a fMe from becoming segmented ff ft fs 
used BEFORE the ffle reaches the end of the disk- I 
suppose yau are familiar wfth the phenomenon of a file 
creeping toward the end of the disk after many EDfT's, 
and then becowfng scattered- The program was wrftten 
wrth 5 1/4" disks fn mfnd, but a friend of mine uses ft 
regularly on his 8" drives under FLEX9- However, 8" 
disks take much longer to re-format , and a tfme 
savings may or may not be realized, depending on how 
many files are on the disk- A 5 1/4" disk can be 
packed In as little as V5QT, on my 6600 system running 
at 1.25 MHz. 

The program supports single or double density, 5 
1/4" or 8 W drives- Two equates must be changed to 
convert to FLEX9- 

I have been using the program for almost a year, 
and I have never had any problems with It, I hereby 
release the program 'PACK" for publishing- I assume no 
responsibility whatsoever for It's use- Feel free to 
pot the program on your Bullet ln^8oard system. I 
Included a copy called "PACK-N0-SPC", Just for this 
purpose- It has had the spaces removed by ^EMSPC**. 



OPT 
TTL 
PAS 



PA6 
PACK 



♦ 

♦ Written Hyt J, H. Sottschill 

• 1712 Leisure Lane 

• Slen Burnie, MD 21161 

♦ (311) 761-1151 

# 

• Laii edited! 11/14/83 

# 

* Purpose! 
# 

• This prograi Kill keep a disk froe 

♦ becoting too se?iented by repeated 

♦ EDIT'* or SAVE's. It Kill love ill 

* FREE SPACE to the end of the disk. 

♦ PACK lust be used BEFORE the files 

• becoie segmented. 
« 

ftftftftftftftftftftftftftftftftftftftftftftftftftftftftftftftftftftftftftftft 

••♦•••••••ft MARNIN6 ################### 

ft 

ft Do NOT atteipt to pack a disk 

ft which contains any non-contiguous 

ft files or directory sectors. 

ft If the disk contains tore than 61 

ft files, you should use i disk doctor 

ft to see if the directory is non- 

♦ contiguous. 
f 

•••••••• ADDITIONAL WARNIN6! ••••••*«•• 
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• RANDOM files CANNOT be loved or they 

• Mill be DESTROYED, hake sure any 
ft randoi files are on the front of 
ft the disk. 



ft 

* SYNTAX: 






♦ ♦♦♦PACK 


Pack xork drive 


• ♦♦♦PACK Pack specified drive 


« 

ft SYSTEM EQUATES 

ft 




♦FLEX 


EQU 


IC000 


FOR FLEX9 


FLEX 


EQU 


IA000 


FOR FLEX2 


ftRESTOF 


: EQU 


$0489 


FDR FLEX9 


RESTOR 


EQU 


ISE89 


FOR FLEX2 


FHS 


EOU 


FLEX^$1406 


FILE MANASEHENT SYSTEM 


FCB 


EOU 


FLEX^$I84I 


FILE CONTROL BLOCK 


RPTERR 


EQU 


FLEWID3F 


REPEAT ERROR 


HARMS 


EQU 


FLEX^I0D03 


WARN START 


HASH 


EQU 


FLEX^IICIC 


MORK DRIVE NUMBER 


PSTRNG 


EOU 


FLEX^eDlE 


PRINT STRING 


OUTADR 


EQU 


FLEX+I0D45 


PRINT ADDRESS 


PCRLF 


EQU 


FLEX+I0D24 


PRINT CRLF 


PUTCHR 


EQU 


FLEX+I0D1G 


WRITE CHARACTER 


SETCHR 


EQU 


FLEX^t0D15 


SET CHARACTER 


NXTCH 


EQU 


FLEX^I0D27 


NEXT LINE BUFFER CHARACTER 


CURCHR 


EQU 


FLEX^$0C18 


CURRENT LINE BUF. CHAR. 


EDLCHR 


EQU 


FLEW0C02 


END OF LINE CHAR. 


ADDBX 


EQU 


FLEX^I0D36 


ADD B RES. TO INDEX RES. 


TTYSPS 


EQU 


FLEX^$0C09 


TTYSET PAUSE CONTROL 


MEMORY 


EQU 


FLEX^$0C2B 


FLEX MEMEND 


VERIFY 


EQU 


FLEX^I1435 


VERIFY FLA6 




0R6 


FLEX^$0100 




LFS 


BRA 


START 




VERSN 


FCB 


3 


VERSION 


LOOP 


FCB 





LOOP INDICATOR 


FILNUN 


FCB 





FILE NUMBER 


TOTFIL 


FCB 





TOTAL FILES 


LOMFS 


FDB 





LOU FREE SECTOR 


LOHFA 


FDB 





LOM FILE ADDRESS 


OLDSA 


FDB 





OLD START ADDRESS 


NEMSA 


FOB 





NEW START ADDRESS 


NENTA 


FDB 





NEW STOP ADDRESS 


XTEHP 


FDB 





TEMPORARY X RE6. 


LASTS 


FDB 





LAST TRACK-SECTOR ON DISK 


SECOVF 


FCB 





SECTOR OVERFLOW INDICATOR 


TTYPS 


FCB 





PAUSE STORAGE 


HEHPT 


FDB 





MEMORY POINTER 


HENEND 


FDB 





MEMORY LIMIT 


FC8PT 


FOB 





FCB POINTER 
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START 


LDAA 


TTYSPS 






LDAA 


•9 


SINSLE SECTOR READ 




STAA 


TTYPS 


STORE CURRENT PAUSE 




STAA 


B,X 






LDAA 


•fl 


TURN PAUSE OFF 




JSR 


FAS 






STAA 


TTYSPS 






BEQ 


COMPAR 






LDX 


MEriORY 


GET FLEX HEHEND 




BRA 


REPORT 






STX 


KEHEND 


STORE IT 


COMPAR 


LDAA 


FCB+64 


IS THIS THE LAST ONE? 




DEC 


HEflEND 


ADJUST FOR SAFETY 




BNE 


CONT2 


TRACKS IF IT IS 




LDAA 


CURCHR 


CHECK TO SEE IF 




BRA 


DONE 




ST6 


CMPA 


tin 


MORE CHARACTERS ARE 


CONT2 


LDX 


•LONFS 


COMPARE TO FIND THE 




BEQ 


ST2 


IN THE LINE BUFFER 




LDAA 


M 


LONEST FREE SECTOR 




CMPA 


EOLCHR 


EOL OR IID MEANS NO 




CMPA 


FCB+64 


IF LONFS IS LONER THAN 




BNE 


ST3 


GET DRIVE NUMBER 




BLO 


NEXTLS 


CURRENT LINK INDICATOR, 


ST2 


LDAA 


MASN 


HORK DRIVE DEFAULT 




BHI 


NENLS 


KEEP SOING. 


ST3 


STAA 


FCB+3 


STORE DRIVE • 




LDAA 


It* 


TRACK IS EQUAL-CHECK 




BRA 


ST9 






CMPA 


FCB+65 


SECTOR, TOO. 


ST3 


SUBA 


1130 


STRIP ASCII 




BHI 


NENLS 






CHPA 


IB 


VALID INPUTS ARE 


NEXTLS 


LDX 


FCB+64 


NEXT SECTOR IN FREE CHAIN 




BLT 


ST4 


fl,t<2 OR 3 




STX 


FCB+30 






CHPA 


13 






BRA 


SSRD 






BLE 


ST5 




NENLS 


LDX 


FCB+64 




ST4 


JSR 


NXTCH 


KEEP SOINS TILL EOL 




STX 


LONFS 


SAVE NEN LON FREE SECTOR 




BRA 


ST6 






BRA 


NEXTLS 


KEEP GOING TILL EOF 


ST9 


JSR 


PCRLF 




DONE 


LDX 


•DATA 






LDX 


•DATA3 


MAKE SURE DRIVE 




JSR 


PSTRNS 


OUTPUT LONFS FOR REFERENCE 




JSR 


PSTRNS 


IS CORRECT 




LDX 


•LONFS 






LDAA 


FCB*3 


SET • 




JSR 


OUTADR 






ADDA 


•131 


MAKE ASCII FOR DISPLAY 


« 










JSR 


PUTCHR 




♦ LFA ■ 


- LONEST FILE ADDRESS 




LDAA 


• '? 




t THIS SECTION SEARCHES THE DIRECTORY FOR THE 




JSR 


PUTCHR 




t FIRST FILE NHICH IS CLOSEST TO LONFS. 




JSR 


SETCHR 


SET RESPONSE 


t ANY FILES NHICH RESIDE AT A LONER ADDRESS 




CMPA 


I'Y 


MUST BE A V 


t THAN LONFS ARE COUNTEI 


), BUT SKIPPED FOR 




BEQ 


STB 




t COMPARISON. 


THIS ROUTINE IS LOOPED 


ST7 


JAP 


EXIT2 


OR RESET TTYSET AND STOP 


t UNTIL ALL FILES HAVE BEEN MOVED 


STB 


LDX 


•FCB 




* TO AN ADDRESS LONER THAN LONFS. 




LDAA 


116 


OPEN SYSTEM INFO. RECORD 












STAA 


Itl 




LFA 


CLR 


LOOP 


FIND LONEST FILE ADDRESS 




JSR 


FHS 






CLR 


FILNUM 


(FIRST FILE PAST LONFSI 




BEQ 


CONT 


CONTINUE-NO ERRORS 




CLR 


TOTFIL 




REPORT 


JSR 


RPTERR 


REPEAT ERRORS NORMALLY 




LDX 


•FCB 






BRA 


ST7 






LDAA 


•6 


OPEN DIRECTORY 


CONT 


LDX 


•FCB 






STAA 


M 






LDAA 


•7 


SET INFO FROM FCB 




JSR 


FHS 






STAA 


M 






BEQ 


SRCH 






JSR 


FHS 






BRA 


ERR! 






BNE 


REPORT 




SRCH 


LDX 


•FCB 






LDX 


FCBM7 


FIRST FREE SECTOR 




LDAA 


•7 


SET INFO RECORD 




STX 


FCB+31 


MAKE CURRENT SECTOR 




STAA 


W 






STX 


LOHFS 


SET UP LON FREE SECTOR 




JSR 


FHS 






LDX 


FCB+26 


LAST TRACK-SECTOR 




BEQ 


SRCHfl 






STX 


LASTS 


STORE FOR REFERENCE 




BRA 


ERRI 




t 








SRCHI 


TST 


FCBM 


FILENAME PRESENT? 


♦ SECOVF REFLECTS THE NUIfBER OF SECTORS 




BNE 


SRCH4 


YES* SOKTHINS IS THERE 


t ON ANY TRACK PLUS ONE, 


, THIS IS USED 




BRA 


SRCH 




♦ FOR COMPARISON PURPOSES IN TSIft 


SRCH4 


INC 


TOTFIL 


COUNT THE ENTRIES 


t 










TST 


FCBM 






LDAA 


LASTS*! 






BMI 


SRCH 


FILE DELETED? 




INCA 






SRCHI 


TST 


LOOP 


HAVE HE BEEN HERE BEFORE? 




STAA 


SECOVF 


ONE PAST HIGH SECTOR 




BNE 


SRCH2 


THEN SKIP THIS PART 


SSRD 


LDX 


•FCB 






LDAA 


LONFS 
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CHPA 


FCB+I7 


ONLY FILES PAST LOHFS 




BLO 


SRCH3 


ARE VALID 




BHI 


SRCH 




SRCH5 


LDAA 


LOMFS+I 


COKPARE SECTOR, TOO 




CHPA 


FCB+IB 






BHS 


SRCH 


LOHFS IS HI6HER OR SAKE 


SRCH3 


LDX 


FCD*I7 


FILE BE6IN ADDRESS 




8TI 


LOMFA 


FIRST VALID DIRECTORY ENTRY 




INC 


LOOP 


SEARCH REST OF DIRECTORY 




LDAA 


TOTFIL 






STAA 


FILNUK 


FIRST FILE TO BE MOVED 




BRA 


SRCH 


SCAN FOR HORE ENTRIES 


SRCH2 


LDAA 


LOMFA 


COKPARE FDR LOHEST 




CKPA 


FCBM7 


FILE ADDRESS 




BHI 


NEHFA 


IS LOHFA HI6HER? 




BLO 


SRCH 






LDAA 


LOHFA* I 


DO SECTOR, TOD 




CKPA 


FEB* IB 






BHI 


NEHFA 


6DT A NEH ONE! 




BRA 


SRCH 


KEEP 60IN6 


fUEHFA 


LDAA 


LOHFS 


KUST BE HI6HER L06ICALLY 




CHPA 


FCB+I7 


THAN LOHf S 




BID 


NEH1 






BHI 


SRCH 


LDHFS IS HI6HER-D0NT DO IT 




LDAA 


LOHFS* I 


DO SECTOR, TOO 




CHPA 


FCB+IB 






BHS 


SRCH 




NEM1 


LDX 


FCB*I7 


GET FILE BEGIN ADDRESS 




STX 


LOHFA 


SAVE NEH LOHFA 




LDAA 


TOTFIL 


KEEP TRACK OF 




STAA 


FILNUK 


HHICH ONE IS LOHFA! 




BRA 


SRCH 




ERR! 


LDAA 


I f I 


ERROR TRAP FOR END OF 




CKPA 


IB 


FILE CONDITION IN DIRECTORY 




BEQ 


D0NE2 


IF NOT AN 'B' THEN 




JKP 


REPORT 


REPORT OTHER ERROR 


D0NE2 


TST 


FILNUK 


ANY FILES TO BE KOVED? 




BEQ 


PACK 


PACK HILL CHECK, TOO 




'M 


IDATA2 






JSR 


PSTRN6 






LDX 


•LOMFA 


REPORT LOHFA 




JSR 


OUTADR 






LDAA 


132 






JSR 


PUTCHR 




FILNAK 


LDX 


IFCB 


PRINT FILENAKE OF FILE 




LDAA 


16 


TO BE JfOVED 




STAA 


M 






JSR 


FKS 






BEQ 


FIL2 






JKP 


REPORT 




FIL2 


LDAB 


FILNUH 


DIRECTORY ENTRY NUKBER 




BEQ 


PACK 




FIL9 


LDAA 


17 


6ET INFO RECORD 




STAA 


M 


FOR THAT ENTRY 




JSR 


fHS 






BNE 


ERROR 






DECB 








BNE 


FIL9 




FIL3 


LDX 


IFCBM 


START OF FILENAKE 




LDAB 


IB 




28 









BSR 


PRNAK 




LDAA 


• \ 




JSR 


PUTCHR 




LDX 


IFCBM2 


EXTENSION 


LDAB 


13 




BSR 


PRNAK 




PACK BRA 


PACK1 


SKIP SUBROUTINE 


ERROR JKP 


REPORT 


HERE FOR CONVENIENCE 


• 

t PRNAK PRINTS THE NUKBER OF LETTERS 


♦ INDICATED IN THE B REG 


». AND POINTED TO 


t BY THE X REE 


»• 




i 

PRNAK LDAA 


M 




BNE 


PRNAK3 




LDAA 


132 


SPACE If BYTE IS ?ERO 


PRNAK3 JSR 


PUTCHR 




INX 






DECB 






BNE 


PRNAK 




RTS 

t 






t LOHFA AND LOHFS ARE KNOHN, 


• THE FILE IS READ INTO 




t USER flEKORY. 


IF AN ERROR OCCURS 


♦ DURIN6 THE flOVE, THE FILE COULD 


t PROBABLY STILL BE RECOVERED, BUT ONLY IF 


« IT HAS NOT HRITTEN ON TOP OF DURIN6 


t THE PACK PROCESS. IF ANY ERRORS OCCUR, 


♦ I RECOKKEND YOU USE 'COPY' TO SALVA6E 


t THE DISK. 






PACK1 LDAB 


FILNUK 


KAKE SURE FILE IS TO BE 


BNE 


PACK2 


PACKED, OTHERHISE 


JKP 


FINISH 


FINISH UP. 


PACK2 LDX 10 






STX 


KEKPT 


CLEAR POINTER 


LOX 


LOHFS 


6ET LOH FREE SECTOR 


STX 


NEHSA 


NEH START ADDR. 


STX 


NEHTA 


NEH STOP ADOR. 


LDAA 


IIFF 




LOX 


IFCB 




STAA 


39 T X 


NO SPACE COKPRESSION 


LDX 


17, X 


STARTIN6 DISK ADDRESS 


PACKS STX 


FCB*3I 


PREP TO READ 


LDX 


IFCB 




LDAA 


19 


SIN6LE SECTOfl READ 


STAA 


M 




JSR 


fKS 




BNE 


ERROR 




t STORE THE READ-IN SECTOR IN USER KEKORY 


PACK3 LOX 


IFCB+64 




PACK4 STX 


FCBPT 


PREP FCB POINTER 


LDAA 


M 


6ET BYTE FROfl SECTOR 


LDX 


KEKPT 


LOAD NEHORY POINTER 


STAA 


M 


SAVE BYTE 


INX 






STX 


KEKPT 


NEXT KEKORY LOCATION 


LOX 


FCBPT 




INX 
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CPX 


IFCB+320 


END OF SECTOR? 


BNE 


PACK4 




•CHECK FOR END-OF-FILE OR BUFFER FULL 


LOX 


FCB+64 


IF END-OF-FILE, 


BEO 


WRTFIL 


WRITE IT OUT 


LDX 


NEMPT 


6ET POINTER 


CPX 


HEMEND 


PAST MEHEND' 


B6E 


PACK* 


HEHPT-HEHEND >=B-> 


LOX 


FCB+64 


6ET NEXT SECTOR LINK 


BRA 


PACKS 




♦ FILE WON'T FIT IN MEMORY - 


t SAVE THE ADDRESS OF THE 


• NEXT SECTOR IN THE FILE 


PACK6 LOX 


FCB**4 


NEXT SECTOR LINK 


STX 


OLDSA 


SAVE IT 


NRTFIL LOX 


IFCB+64 




STX 


FCBPT 


PREP FCB POINTER 


LDX 


10 




STX 


HEHPT 


CLEAR MEMORY POINTER 


HRT2 LDAA 


M 


GET BYTE 


INX 






STX 


HEHPT 


BUMP POINTER 


LDX 


FCBPT 




STAA 


B,X 


SAVE BYTE IN FCB 


INX 






STX 


FCBPT 


BUMP POINTER 


CPX 


•FCB+32B 


END OF SECTOR? 


BEO 


WRT3 




LDX 


HEHPT 




BRA 


HRT2 




HRT3 LDX 


LOHFS 




STX 


FCB+3B 


PREP TO WRITE 


JSR 


TSINC 


TRACK, SECTOR INCREMENT 


STX 


LOHFS 


KEEP THIS CURRENT! 


TST 


FCB+64 


EOF' 


BEO 


CLEAN 


CLEAN IT UP 


STX 


FCB+64 


LINK SECTOR 


STX 


NEHTA 


NEW STOP ADDR, 


JSR 


WRSS 


WRITE SIN6LE SECTOR 


LDX 


•FCB+64 




STX 


FCBPT 


PREP FCB POINTER 


LOX 


KEMPT 




CPX 


NEMEND 


PAST MEMEND? 


BLE 


WRT2 


NO, KEEP 60INS 


• SET POINTERS FOR THE NEXT PASS 


♦ ON A LAR6E FILE 




LDX 


IB 




STX 


MEMPT 




LDX 


OlDSA 


CONTINUATION POINT 


JMP 


PACKS 




CLEAN JSR 


HRSS 


WRITE FINAL SECTOR 


LDX 


•FCB 




LDAA 


It 


OPEN DIRECTORY 


STAA 


M 




JSR 


FMS 




BEfl 


ClI 




JNP 


REPORT 




CLI LDAB 


FILNUH 


6ET APPROPRIATE 


CL2 LDAA 


17 


INFO RECORD 
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STAA 


M 




JSR 


FMS 




BEO 


CL3 




JMP 


REPORT 




CL3 DECB 




60 TILL 8*0 


BNE 


CL2 




LDX 


IFCB 




LDAB 


49,X 


DATA OFFSET BYTE 


LDX 


•FCB*77 


POINT TO FIRST FILE ADDRESS 


JSR 


ADDBX 


ADD DATA OFFSET 


LDAA 


NEWSA 




STAA 


M 


SECTOR BUFFER MUST BE 


LDAA 


NEWSA+I 


CHAN6ED DIRECTLY* THE 


STAA 


M 


PUT INFO. RECORD FUNCTION 


LDAA 


NEWTA 


WILL NOT CHAN6E THESE 


STAA 


2,X 


BYTES 


LDAA 


NEWTA+1 




STAA 


3,X 




LDX 


NEWSA 




STX 


FCB^I7 


JUST IN CASE, CHAN6E 


LDX 


NEWTA 


THESE, TOO 


STX 


fCB*I9 




LDX 


•FCB 




LDAA 


IB 


PUT INFO REC. BACK 


STAA 


M 




JSR 


FMS 




BEO 


CL4 




JMP 


T0BAD2 


DIRECTORY PROB. DAMA6ED 


CL4 JMP 


LFA 


FIND LOWEST FILE A6AIN 


FINISH LDX 


IFCB 




LDAA 


116 


OPEN SYSTEM RECORD 


STAA 


M 




JSR 


FMS 




BEO 


FII 




JMP 


REPORT 




FU LDAA 


17 


SET INFO REC 


STAA 


M 




JSR 


FMS 




BEO 


F12 




JMP 


REPORT 




FI2 LDX 


FCB+26 


LAST TRACK, SECTOR 


STI 


LASTS 




LDX 


IFCB 


LOCATE THE TRACK-SECTOR 


LDAB 


49,X 


INFO. [N THE SECTOR 


LDX 


•FCB*77 


BUFFER ITSELF. 


JSR 


ADDBX 


ADD DATA OFFSET 


LDAA 


LOWFS 




STAA 


M 


MODIFY SECTOR BUFFER 


LDAA 


LOWFS+I 


DIRECTLY 


STAA 


1,X 




LDAA 


LASTS 




STAA 


2,X 




LDAA 


LASTS*I 




STAA 


3,X 




LDX 


LOWFS 




STX 


FCBM7 


JUST IN CASE 


LDX 


LASTS 




STX 


FCBM9 




LDX 


IFCB 




LDAA 


ie 


PUT INFO REC. BACK 



29 





STAA 


8,1 














JSR 


FHS 














BEO 


F13 














BRA 


T0BAD3 












FI3 


LDX 
JSR 


IRDATA 
PSTRN6 


RE-FORMAT REST Of DISK 
THIS TAKES AWHILE. 












CLR 


VERIFY 


SPEEDS THIN6S UP 


TSINC 


INX 




TRACK-SECTOR INCREHENT 




LDX 


IFCB+64 






STX 


XTEHP 






LDAA 


•0 






LDAA 


XTEHP+1 




FH 


STAA 
INX 


M 


CLEAR OUT BUFFER 




CKPA 
BNE 


SECOVF 
TSRET 


OVER LAST SECTOR? 




CPX 


IFCB+Hfl 






LDAA 


11 


FIRST SECTOR 




»NE 


FH 






STAA 


XTEHP+1 


OF 


FI5 


LD1 


LONFS 






INC 


XTEHP 


NEXT TRACK 




STX 


FCB+30 


PREP TO WRITE 




LOX 


XTEHP 






CPX 


LASTS 


LAST SECTOR 7 


TSRET 


RTS 








BEO 


EXIT 




WRSS 


LOX 


•FCB 


WRITE SINGLE SECTOR 




LD1 


LONFS 






LDAA 


• 14 






BSR 


TSINC 


PREP FOR LINKA6E 




STAA 


B,X 






STX 


LOWFS 






JSR 


FNS 






STI 


FCB+64 


LINK TO NEXT 




BED 


WRSI 






LDX 


IFCB 






PULA 




FIX STACK 




LDAA 


•IB 


SIN6LE SECTOR WRITE 




PULA 








STAA 


M 






BRA 


TOBAD 


FILE PROBABLY DAHA6ED 




JSR 


FKS 




WRSI 


RTS 








BEO 


FI5 














BRA 


T0BAD4 


CLEAN-UP ERROR 


DATA 


FCC 


'Lowest free sector ' 


EXIT 


CLR 


FCB*64 


SET EOF INDICATION 




FCB 


4 






CLR 


FCB+63 




DATA2 


FCC 


'Moving 


froi ' 




con 


VERIFY 


TURN IT BACK ON 




FCB 


4 






LOX 


•FCB 




DATA3 


FCC 


'REHENBERt RANDOH Hies CANNOT be iQvedf 




LDAA 


I1B 


S.S. WRITE 




FDB 


IIDIA 






STAA 


B.I 






FCC 


'Pack drive •' 




JSR 


FHS 






FCB 


4 






BNE 


TOBADS 


ERROR ON LAST SECTOR 


DATA4 


FCC 


'Pack coeplett' 




JSR 


RESTOR 


SEEK TO TRACK 88 




FCB 


4 






LD1 


•DATA4 


ALL DONE 1 


DATA5 


FCC 


'ERROR while writing very last sector.' 




JSR 


PSTRK6 






FDB 


IBDIA 




EXIT2 


LDAA 


TTYPS 


RESTORE TTYSET PAUSE 




FCC 


'Use 'COPY 1 to salvage the disk.' 




STAA 


TTYSPS 






FCB 


4 






JHP 


HARMS 




DATA6 


FCC 


'An ERROR occured nhile reformatting. ' 


T0BAD3 


LDX 


IDATAS 






FDB 


IBDIA 




TOOBAD 


JSR 


PSTRN6 






FCC 


'Use •COPY' to salvage the disk.' 




JHP 


REPORT 


REPORT ERROR THRU FLEX 




FCB 


4 




T0BAD4 


LDX 


IDATA6 




DATA7 


FCC 


'Systei 


Info Record duaged' 




BRA 


TOOBAD 






FCB 


4 




T0BAD3 


LDX 


IDATA7 




DATAB 


FCC 


'Directory probably duaged' 




BRA 


TOOBAD 






FCB 


4 




T0BAD2 


LDX 


IDATAS 




DATA? 


FCC 


'ERROR during Single-Sector-Write. 1 




BRA 


TOOBAD 






FCC 


'file probably duaged' 


TOBAD 


LDX 


•DATA? 






FCB 


4 






BRA 


TOOBAD 




RDATA 


FCC 


'AH files loved.' 


f 










FOB 


UNA 




• TSINC KILL INCREMENT THE TRACK AND 




FCC 


'Re-fori 


utting. Please be patient.' 


♦ SECTOft ADDRESS WHILE C0NF0RMIN6 TO 




FCB 


4 




« THE NUMBER OF SECTORS PER TRACK. 




END 


LF6 




♦ THE ADDRESS IS STORED IN THE I 










• RE6ISTER ON ENTRY AND RETURNED 










* IN THE X REE 

t 


i. 0* EXIT. 
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WORD.BAS & 



Chris Robinson 



XON .OVL 



A coupfe of progs that may be of use to 
someone^The 'words. bas' prog 1 s yet another bJgprlnt 
prog.but i find it more useful!. The 'xon.ovT prog allows 
the normal 'flex' escape routine to operate but adds 
'xon/xof f'capab i Illy. How about more assembler routines 
I .e Ron Andersons never to be aired maths routines. Keep 
up the good work on an excellent magazine. 

1 REM 

2 REN This B1SPR1NT prograi was developed and written 

3 REM by Chris Robinson 

4 REN P.O box 9276 

5 REN Hanlton 

6 REN New Zealand 

7 REM 

8 REH 

50 REM characters are displayed in a 7X11 grid aith lower 
case descenders. 

51 REM each value in the data statemets contains the A 2 
value of each row, 

52 REM 65=bit 2 A 7 and 2 A 1 are on i.e X00000X 

53 RE« I8*bit 2 A 5 and 2 A 2 are on i.e 00X00X0 

54 REH 127=2 A 7+2 A 6*2 A 5*2 A 4*2 A 3*2 A 2*2 A i XXXXXXX 
98 REH 



99 REM systet equates 

100 CIS^HRSIHEXCIA')) 
character 

110 ES$=CHR$MEX('1B')) 

character 

120 SR$=ES$*'$' 

into graphics aode 

130 N6$=ES$*'Z' 

graphics lode 

140 BL$«6R$*CHR$(HEX('7rmN6$ 

character 

49B REH 



REM dear screen 
REM escape 
REM put terminal 
REM out of 
REM block 



499 REH start prog. set up array's, fi 11 <get parateters. 

500 PRINT CL$ :REM clear screen 
1000 DIH B:<95,11):IIH B$(95):DIH AZ(ll) : REM alocate 
storage 

1010 60SUB 5400 : REN fill quick 

reference array 

1020 INPUT 'Width magnification factor (1 to 30) ";M$: IF 

VAKHIKl OR VALWJ>30 THEN 1020 ELSE WX=VAL(W$) 

1040 INPUT "Height tagnification factor (I to 30) ';H$: IF 

VALWK1 OR VAL(H$)>30 THEN 1040 ELSE HX*VAL(H$) 

1060 INPUT 'Use The character, 'b lock or Vser supplied 

(t,b or u) ';C$ 

10B0 IF CI-'T 1 OR C$*'r OR CI»'B* OR Ct='b - OR ZWV OR 

C*=-V THEN 1090 ELSE 1060 

1090 IF Ct='T - OR Dl='f THEN C$='-2' 

1095 IF CI^B' OR C$=V THEN Cls'-l* 

J 100 IF Oi*T OR C$*V THEN lNPUT"Khich character would 

you like to use ";C$ 



1110 INPUT 'Kidth of page (40 to 160) B ;PX:RErl arbitary 

values 

H20 IF PX<40 OR PXM60 THEN 1110 

1130 CLOSE 

1140 INPUT 'Print a'crgss the page or 'd'own the page (a or 

d) ';0$ 

1150 IF 0S='A' OR 0$=V OR OI^D 1 OR D$='d' THEN 1160 ELSE 

1140 

1160 INPUT 'Output to the "screen or to the 'p'nnter or 

Yuit (s,p or q) ';PS 

1170 IF PS='B' OR Pf=V THEK 10000 

1180 IF Pft'S 4 OR Pt=V OR P$=*P* OR P$='p' THEN 1190 ELSE 

1160 

1190 IF FI='P" OR PS^'p' THEN 2000 ELSE 2040 

2000 OPEN 'S.CHD' AS :REM open printer 

file 

2005 IF C$=M a THEN C$='-2 B : REH force 'the 

character' if for printer 

2010 INPUT Ms the paper aligned (y/n) *;XU 

2020 IF ri$='Y' OR X1$=V THEN 2040 ELSE 2010 

2040 INPUT 'Do you want to continue (y/n) ";X1$ 

2050 IF X1S*'V OR Xt$-V THEN 2100 

2060 IF Xll^N* OR X1$=V THEN 10000 ELSE 2040 

2100 PRINT CLS 

2110 T$=" 

2160 PRINT 'Please type in the text you wish to display " 

21B0 INPUT L3NE T$ 

2200 IF DS-'D' OR 0$-'d' THEN 3010 

2210 SX=((LEN(T$)*7U«)M(LENIT$)-l)*U*NX)):REfl find 

centre 

2220 IF SX<=PX THEN 2450 

2230 PRINT "The length of text tiies the tagnification 

factor is to wide for the page !!' 

2240 PRINT 'Please re-enter. # :80T0 2110 

2450 PRINT CLS 

2500 WIX=PX-SX 

2510 IF H1Z=0 THEN SIX*0 ELSE SlX=IHT(«lX/2) 

2550 FIR tt-1 TO II :REN depth of 

character 

2560 FOR MX=1 TO HX *REM height aip 

factor 

2570 PRINTIOJMSm;"; :REM centre 

justify 

25B0 FOR KX=1 TO LEN(TI) -REM no o* chars 

2590 60SUB 5100 :REH get working 

character 

2595 CX=AX(IXf 

2600 ZX=64 

2610 FOR JX=1 TO 7 

2620 CX=CX-2X 

2630 IF AX<0)=1 THEN D$*BL$ ELSE D$=CHR$(AX(0)) 

2634 IF CX<0 THEN D$=" " 

2640 FOR U=l TO HI: PRINTtO, D$; 

2650 NEXT LX 

2660 IF CX<0 THEN CX*CX*ZX 

2670 ll*W2 

26B0 NEXT JX 

2685 IF KX=LEN(T$) THEN 2720 

2690 FOR K2X=1 TO <UKX) 

2700 PRINTI0,' '; 
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2710 NEXT HI 

2720 NEXT rtt 

2730 PRINTIO 

2740 NE<T MX 

2750 tfXT IX 

2770 SOTO 2040 

3000 REM 

3010 IF iUHK-PZ THEN 3050 

3020 PRINT 'The height of the characters tiies the 

•agruhcatian t actor " 

3030 PRINT "is too aide tor the page size Please 

re-enter M ■ ' 

3040 60T0 1020 

3050 H1X*PX-U1*H*) 

3060 [F H1X=0 THEN S1X=0 ELSE SU=lNT<HlX/2) 

3070 FOR KX=I TO LEMiTIl : REM do for each 

char 

SCSUB 5100 

ZU64 

FDR IX* 1 TO 7 :REH do for each 



3080 

3090 

3100 

bit 

3110 

3120 

3130 

3140 

3150 

3160 

3170 

3180 

3190 

3200 

3210 

3220 

3230 

3240 

3250 

3260 

3270 

3280 

3290 

3300 

3310 

3320 



F0« JX=1 TO NX 
PMNTIOJABtSKh"; 
FOR LX=11 TO 1 STEP -1 
CX=AX(LX> 
CX=Cl-2l 

IF AX(0)=1 THEN D$=8U ELSE D$-CHR$(AX(0)) 
IF CX<0 THEN 0$=' ' 
FOR HX-1 TO HItPRINTI0,D$; 
NEXT NX 
NEXT LX 

IF JZOil THEN 3250 
FOR NX=1 TO 11 

IF AX(NX)WX THEN AZ(NX)=AX(NXMX 
NEXT HX 
PR1NTI0 
NEXT JX 
IX-W2 
NEXT IX 

IF KX=LEN(T$) THEN 3330 
FOR rU=l TO (]«HX) 

PRINTiO 
NEXT NX 
3330 NEXT KZ 
3350 GOTO 2040 

4000 DATA " ',0,0,0, 0,0,0, 0,0,0, 0,0 
4010 DATA A, 28, 34,65, 65, 65,127,65,65, 65,0,0 
4020 DATA 8,0,0,0,28,2,62,66,66,61,0,0 
4030 DATA B, 126, 33, 33,33, 62, 33, 33, 33, 126,0,0 
4040 DATA 6,64,64,64,92,98,66,66,98,92,0,0 
4050 DATA C, 30, 33, 64, 64, 64, 64, 64, 33, 30, 0,0 
4060 DATA c, 0,0, 0,60, 66,64, 64, 66,60, 0,0 
4070 DATA 0,124,34,33,33,33,33,33,34,124,0,0 
4080 DATA d, 2, 2,2, 58, 70, 66, 66, 70,58,0,0 
4090 DATA E, 127,64,64,64,120,64,64,64, 127,0,0 
4100 DATA 6,0,0,0,60,66,126,64,64,60,0,0 
4110 DATA F, 127,64,64,64,120,64,64,64,64,0,0 
4120 DATA f, 12, 18, 16, 16, 124, 16, 16, 16, 16, 0,0 
4130 DATA 8,30,33,64,64,64,79,65,33,30,0,0 
4140 DATA g, 0,0, 0,58, 70, 66, 70, 58, 2,66, 60 



4150 DATA H,65,65, 05,65,127,65,65,65,65,0,0 
4160 DATA h, 64, 64, 64, 92,98, 66,66, 66, 66, 0,0 
4170 DATA 1,62,8,8,8,8,8,0,8,62,0,0 
41B0 DATA 1,0,8,0,24,8,8,8,9,28,0,0 
4190 DATA J, 31, 4,4, 4, 4, 4, 4, 68, 56,0,0 
4200 DATA ^0,0,0,6,2,2,2,2,2,34,28 
4210 DATA K,65, 66, 68, 72, 80, 104,68,66,65,0,0 
4220 DATA k t 64, 64, 64, 68, 72, 80,104, 68, 66,0,0 
4230 DATA 1,64,64,64,64,64,64,64,64,127,0,0 
4240 DATA 1,24,8,8,8,8,8,8,8,28,0,0 
4250 DATA 11,65,9', 85, 73,73,65,65,65,65,0,0 
4260 DATA a, 0,0, 0,118, 73, 73, 73, 73, 73, 0,0 
4270 DATA 11,65,97,81,73,69,67,65,65,65,0,0 
4280 DATA n, 0,0, 0,92, 98, 66, 66, 66, 66,0,0 
4290 DATA D,28, 34,65, 65, 65, 65 r 65, 34,28, 0,0 
4300 DATA 0,0,0,0,60,66,66,66,66,60,0,0 
4310 DATA P, i26, 65, 65, 65, 126,64,64,64,64,0,0 
4320 DATA p, 0,0, 0,92, 98, 66, 66,96,92, 64, 64 
4330 DATA 0,28,34,65,65,65,73,69,34,29,0,0 
4340 DATA q, 0,0, 0,58, 70,66, 66,70, 58,2,2 
4350 DATA R, 126, 65, 65, 65, 126, 72, 68, 66, 65, 0,0 
4360 DATA r, 0,0, 0,92, 98, 64, 64,64, 64,0,0 
4370 DATA S, 62, 65, 64, 64, 62, 1,1, 65, 62, 0,0 
4380 DATA $,0,0,0,60,66,48,12,66,60,0,0 
4390 DATA T, 127, 8, 8, 8, 8, 8, 8, 8, 8, 0,0 
4400 DATA t,0, 16, 16, 124, 16, 16, 16, 18, 12, 0,0 
4410 DATA i>,65, 65, 65,65,65, 65, 65,65,62, 0,0 
4420 DATA u,0, 0,0, 66, 66, 66, 66, 70,58,0,0 
4430 DATA V,65,65,65,34,34,20,20,B,B,0,0 
4440 DATA v,0, 0,0, 65, 65, 65, 34, 20, 8, 0,0 
4450 DATA M,65, 65, 65, 65, 73, 73, 85, 99, 65,0,0 
4460 DATA a, 0,0, 0,65, 73, 73, 73, 73, 54,0,0 
4470 DATA X, 65, 65, 34, 20, 8, 20,34,65, 65, 0,0 
4480 DATA x, 0,0, 0,66, 36, 24, 24, 36, 66, 0,0 
4490 DATA Y,65, 65, 34, 20, 8, 8, 8,8,8,0,0 
4500 DATA y, 0,0, 0,66, 66, 66, 70, 58, 2, 66, 60 
4510 DATA 2,127,1,2,4,8,16,32,64,127,0,0 
4520 DATA :,«,0,0, 126,4,8, 16, 32, J26, 0,0 
4530 DATA "0", 62, 65, 67, 69, 73, 81, 97, 65,62,0,0 
4540 DATA "1\ 8, 24, 40, 8,8, 8,8, 8, 62,0,0 
4550 DATA "2", 62, 65, 1,2, 28, 32, 64,64, 127, 0,0 
4560 DATA '3\ 62, 65, 1,1, 30, 1,1, 65,62, 0,0 
4570 DATA '4\ 2, 6, 10, IB, 34, 66,127, 2, 2,0,0 
4580 DATA "5\ 127, 64, 64, 124, 2, 1,1, 66, 60, 0,0 
4590 DATA V, 30, 32,64, 64,126, 65, 65, 65, 62, 0,0 
4600 DATA B 7 a , 127,65,2,4,8, 16, 16, 16,16,0,0 
4610 DATA ■B i , 62, 65,65, 65, 62, 65, 65, 65, 62,0,0 
4620 DATA B 9\62, 65, 65, 65, 63,1, 1,2, 60, 0,0 
4630 DATA 1,8,8,8,8,8,0,0,8,8,0,0 
4640 DATA «, 30, 33, 77,85, 85, 94, 64, 32, 30, 0,0 
4650 DATA 1,20,20,20,127,20,127,20,20,20,0,0 
4660 DATA 1,8,63,72,72,62,9,9,126,8,0,0 
4670 DATA X, 32, 81, 34, 4, 8, 16, 34, 69,2,0,0 
4680 DATA *,8, 20, 34, 65,0, 0,0, 0,0, 0,0 
4690 DATA (,56,68,68,40,16,41,70,70,57,0,0 
4700 DATA 1,0,8,73,42,28,42,73,8,0,0,0 
4710 DATA (.4,8,16,16,16,16,16,8,4,0,0 
4720 DATA >,16, 8, 4, 4, 4, 4, 4, 8, 16, 0,0 
4730 DATA -,0,0,0,0,127,0,0,0,0,0,0 
4740 DATA .,0,0,0,0,0,0,0,0,127,0,0 
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4750 DATA ♦, 0,8, 8, 6, 127,6,8,8,0,0,0 
4760 DATA *, 0,0,0, 30,0, 30, 0,0, 0,0,0 
4770 DATA v , 48^73,6,0,0, 0,0, 0,0, 0,0 
4780 DATA \ 24, 24, 8, 4, 0,0, 0,0, 0,0,0 
4790 DATA 1,8,6,8,0,0,8,8,8,0,0,0 
4800 DATA V, 0,64, 32, 16, 8, 4*2,1,0,0,0 
4810 DATA ], 60, 4, 4, 4,4,4,4,4,60, 0,0 
4820 DA?A C, 60, 32*32,32,32, 32, 32, 32,60,0*0 
4830 DATA :, 0,0, 0,24, 24, 0,0, 24, 24, 0,0 
4840 DATA ; ,0,0,0,24,24,0,0,24,24,16,32 
4850 DATA "%\2 J2,8,16 T 0,0,0,0,0,0,0 
4860 DATA '",36,36,36,0,0,0,0,0,0,0,0 
4870 DATA <>4,8, 16,32,64,32, 16,8,4,0,0 
4880 DATA V, 0,0, 0,0, 0,0,0, 24, 24, 16, 32 
4890 DATA >J6, 8,4, 2, 1,2,4,8, 16,0,0 
4900 DATA V \Q, 0,0,0,0, 0,0, 24, 24, 0,0 
4910 DATA ?,30,33,33,l,b,B,8,0,8,0,0 
4920 DATA /, 0,1, 2, 4,8, 16, 32, 64, 0,0,0 
4930 DATA ),24, 4, 4, 4, 2, 4, 4, 4, 24, 0,0 
4940 DATA {,12,16,16,16,32,16 J6, 16, 12, 0,0 
5000 REh 

5100 REH transfer subroutine. find character 
5110 Xi$=HIDMT$,KX,I) 
5120 FDR I I'M TO 96 
5130 If 1U=96 THEN 9990 

5140 if n$=e$um then goto 5300 

5150 NEXT III 
5160 RETURN 

5299 REH Dut character into working array. 

5300 FDR KH=I TO II 

5310 AKKIZ]=8Z<1U,KU) 

5320 NEXT KU 

5330 IF CS-'-P THEN AXtO)=l 

5340 IF C$^2 - THEN AX(0)=ASCUI$) 

5350 IF LEN(C$)<2 THEN AX<0)=ASC<C$> 

5360 RETURN 

5399 REH transfer data to quick reference array. 

5400 PRINT "Hang on tor a second «Mle I relearn the 
alphabet * 

5410 RESTORE 
5420 FOR IZ=l TO 95 
5425 PRINT V; 
5430 READBKUJ 
5440 FDR KX=1 TO li 
5450 READ 82(12, K!) 
5460 NEXT XX 
5470 NEXT U 

5480 PRINTiPftINT "Right here Ne 90 no* *:PRINT 

5490 RETURN 

9990 PRINT 'One of the characters does not exist 

r 1 1 1 r 1 u 1 1 1« 

10000 INPUT "Do you want to 'p'uit or to Vestart (q or r) 

■;X1$ 

10005 PRINT CL$ 

10010 IF llll-'R* OR M*'r m THEN 1020 

10020 IF XIIs'Q - OR XI$=V THEN 10030 ELSE 10000 

10030 CLOSE 

10040 END 



new xon/xc*4 routine 




. overlay called by 


get jon.ovl ' at 


startup. 


escjoutine equ 


$ce90 


flex escape routine 


inchar equ 


$d381 


*lex get chracter routine 


org 


$d37d 


break into existing routine 


bra 


nenroutine 




• 

org 


$f000 


put in DhA space 


neurotome sta 


I1X 


old routine (print character) 


bsr 


esc_rDutir>e 


use existing escape routine 


ctpa 


#$13 


DC3 char U off) 


bne 


finish 


if previous ttyesc or not xoff 


getcharloop bsr 


inchar 


Mas xoff noN »ait for xon 


cepa 


#$11 


X on ??? 


bne 


getcharloop 


no 


clra 




clra onJy if previous xoH/xon 


tinish puis 


pc,x,b 


return 


end 
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► Poblnson 


HamN+on 
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UNIVERSAL SINGLE BOARD 



The XL 68 S Is a single board computer which was developed 
on the basis of the existing XL 68 Euroboard system conprl- 
slng about 25 cards 10 x 16 cm with 6* pin/ socket connec- 
tors eacf\. 

It was the extensile use of those high priced connectors, 
the repeated need of po*et consuming buffer chips and the 
W9$te of board space which triggered the Idea, 

The two gxtidlng principles throughout the development were 
li rhe exploitation of Motorola*: 6809' s capabilities and 
21 additional nard«are enhancements 'or increased speed and 
programming power. 

Although any 6809 Operating system could be invlemented 
there are at least three on the market which would fit 
directly with little junver movement: FLEX or WlFlEX from 
TSC or OS- 9 available from Mlcroware. As a matter of fact 
an external toggle Switch gives you fast and easy choice 
between the two worlds assuming you got the monitor ROMs 
plugged In. *ith cross assemblers In the wings we can all 
hope for grater activities with both operating systms. 

Tt)e dimensions of the XL 68 S boar* are 31 by 42 cm so the 
longest sloe would still fit Into a 19" rack mount. 

All peripheral connectors are of the printed circuit type 
and are solozred to tne long edges of the board. 

Tfte board is divided Into function areas which surround the 
CPU block located at the center. Also in the center Is the 
bus connector for a twofold purpose. It allows for diag- 
nostics while each function area can be dlsaolel with jum- 
pers end It serves as an expansion connector for future 
sanowichlng a second board level onto the me in board. At 
present we will only be concerned with the msln board. 

Tne CPU Is Motorola *s 4809E. Tt)e E-verslon was chosen for 
multiprocessing applications with additional 6809E's 
through the above mentioned bus connector. 

Memory management which could be disabled oetls with 4K and 
64K blocks (exchanging buffers and moving jumjets allows 
for SWTP's OAT configuration assjmlng the use of their 
S~BUG). A OIL socket Is provided for s^onature analysis 
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etc. There Is a watcn dog circuit in this area of the board 
which, when enabled, will trigger a nonostable at power-on. 
This monostab.e would have to be retrlggered tnrough soft' 
■are at strategic points of your program in order not to 
faZSET the computer. This is son* kind of alarm system often 
used with lnoustrial applications to prevent the computer 
from "running wild". 

Ne*t to the CPU block is the /rain decoding area responsible 
for generating chip selects or area s-J*cts for the «noie 
board as well as predecoded slgttals for future 110 and A/0 
and 0/4 converters. Needless to say that tnere are J<*pers 
connected wltn It. 

Ttx* PROM area contains sockets for 22K. Two of those 
sockets can be configured for a total of 4k OQS RAN with 
onboard battery back-up to save data at power-fall. There 
are two sockets at FdOO for switch-selecting operating sys- 
tems. 

The 6 08-25 connectors on one side of the board directly 
feed to 5 terminals (or other serial applications) and one 
(parallel) printer. Thtougn Jumpers and an additional DC/OC 
converter, two of the serial ports can be chained to op to- 
Isolated 20 /rtf Interfaces. 

The 256k dynamic RAN Is physically located at 0000 to 
79FF, 1 0000 to I 7FFF etc in eight 12K blocks. One could 
phq In only 64k byte or one could disable It completely 
and use the above 4* OOS RAN for test purposes. 

The floppy disk controller for 8" drives features DMA for 
double density and makes use of the Western Digital 
controller set. 

The 5 1/4" working mode Is being provided but has yet to be 
tried out. An adapter plug/ receptacle to convert from the 
standard 8 m to the 5 1/4* connector would also be needed. 

The next board edge connector Is a 64 pin/socket type 
catering tne tnree PlA*s. Their A0/A1 lines could be used 
as Is or Interchanged for easy 2 byte operation. 

An I£££~488 QP18 interface serves as controller, listener 
or talker. To free the CPU from too mucn GP1B work and to 
speed up transfer by a factor of 4 a second OMA controller 
may be used in conjunction with the interface. Tiw> decision 
lies with the software. The connector Is a 08-25. 

Two of tne remaining Ohq channels of the same controller to- 
gether with Ik byte of private RAN constitute a fast way of 
transferring large nvunts of data with very little CPU 
time. The transfer rate is 500 byte/mec. 

There is one OHA channel left. Its control lines and the 
data bus are accessible from tne outside world through 
another 08-25 connector, opening up more data transfer 
possibilities. The same connector also carries an additio- 
nal Pla byt m wltn optional buffer and a single line out- 
putting a 4 msec pulse when selecting a specie! address. 

An 0X1 5852 delivers date and time when so told via special 
program and PI A and It will keep time with its own on-ooard 
battery supply. 

The most costly single Item on the board Is the 9511 or 
9512 arlthnvilc processor and may seldom be used; but 
taking up little space, the socket and a few more compo~ 
nents «*ere Incorporated to offer. If so desired, 10:1 lm~ 
provement over software arlthtr*>tlc. 

Last not least there are two 6840 timer ohlps. Besides 
their many Internal uses one of the timers has. If con- 
figured via jtnpers, its Input and output signals fed 
through some unused pins of a 00-25 connector ottwjrwlse 
used for R5-212. 

As for expansion: I already mentioned the bits connector for 
multl processing;. But I'm also thinking of high resolution 
graphics and/or Winchester controller. 

Furthermore, a 40 pin Holex is provided with the necessary 
control and data lints for AIO end OIA conversion. 



For 1/0 expansion 4 OIL sockets 
lines would feed 5 At I As or 5 PI As. 



with predecoded select 



With a power consunptlon of about 20 watts the board would 
need no additional cooling when mounted vertically (i.e. 
behind the drawer housing of a type writer table. The 
housing Itself could contain two floppies and the power 
supplies). 

By now I expect that while reading ail this you come up 
with a few applications of your own. well, that's the Idea! 

Now for some figures: the board's real estate has been 
reditced by about Jfl I compared to conventional set-ups. The 
sane measures reduced the power by about 30 t. Tr« expense 
for the motherboard m with Its plug/socket caitilnatlon was 
eliminated and so were a number of redundant components 
like buffers, decoding circuitry etc. The resultant ad- 
vantages, for the given number of functions, are considera- 
ble savings concerning material and power supply. Increased 
reliability end higher life expectancy due to the lack of 
Interconnecting mechanics and lower temperature. 

with the hlgner complexity of the board irvre thought was 
given to diagnostics- Each function area can be disabled 
seperately with one Jumper. The same goes for V > 

As for economics, the degree of assembly can 6e made to 
match the application, 

A final word about the availability of the *± 68 S: I am 
looking for a co"t>uter or kit manufacturer who might be 
Interested In son* license agreement. 

At the same time I'm trying to find out if there ale enough 
people Interested In ouylnQ the bare board with obcu^cnta- 
tion directly from me. 

All operating software - unless you write your o*n - should 
be obtained from the orlglnel software companies mentioned 
earlier or from their licensed dealers. 

Altnough all values and position numbers are printed on the 
board, only experienced tcbbylsts or professionals should 
tackle the ass&rtly. 



Cunter ,}ansen 
Unter Oelbach 1 



0-5090 Lever kusen J 

W. Germany 

Phone: t0)2171-)067* 



BIT BUCKET 



As pointed out earlier ail those expansions would fit on a 
second board level realized in form of independent smaller 
boards. 



069 SIG OH O0MU5E37VE 



An 059 Special Interest Group is available an CcrpuSerMe? 
a nation wide netvork. 

A Special Interest Group (SIG) is a unique utility on 
CompuServe that enables users with similiar interest to 
share ideas. There are three (3) major areas to fcJ» 
SIG. 

1. Mail or message switching. 

2. CanfierenciDQ. 

3. Data Bases. 

Message switching is the exchange of infbrmatirxi fran one 
user to all other users. Messages are normally read, 
written, and stored in serial fashion with tlte oldest at 
the "bottom of the stack* . Various methods of reading 
these messages are a\^ilaMe. Scms of the options are: 

1. Read marked trcasagea. 

Messages sent to you, or marked by you. 

2. Read selective message by subject. 

Other options are available, which the CompuServe 
publication for Special Interest Groups ewers in more 
detail. 

Conferencing: 

Conferencing permits members of the SIG to have 
live interaction conversations vtih one another to 
discuss various topics. 
Data Basest 

Data Bases are divided into sectims. This permits 
easy maintenance and accessibility. To start, 
there are four data bases. Tnese can be added to 
or modified as needed. The four data bases are: 
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1. Data Base 0: General Inttxcrration. 

(System information, ect.) 

2. Data Base I: Uasic09. 

3. Data Base 2: "C* section . 

4. Data Base 3: Pascal* 

As stated before, the operation of the 5IG is explained 
in greater detail in the publication 'Special uteres* 
Group Instructions'" avalable form CfcufMServe. One can 
join CoropuServ* thrrx^h their local can-piter store or ty 
contacting ctJTj*iSorv*» at: 

CijTpuSecve 

Ineormation Service Division 
5000 Arlington Centre Blvd. 
Oaluntjua Ohio 43220 

Any currents or su^estjona will be v>elcaiead. 

Jiiii Belkno 
76703,467 
Systsn Operator 
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davoloposfit tritaa which doublai a« § dadlcalad vord procasaor. Th« «rtt»* hoi 
t»fn dttlonad spoclMcotly for tt>a angl nvar »h« n«ads *n ajCdfiQ? totl^ara 
dav0l00B*nt ttadon and aUo radulroo a M^ partor*an«t dadleaiad word 
p'oettior xo Produea tSt mocUcid docwotni »t ton. 



ITAC 


♦roe 


lOTr" 


PDB 


BOT 


FDB 


CMfMfl 


FOB 


ULON 


FOB 


tlLO^P 


FD» 


BUPON 


FOB 


GUPO^F 


PDB 


BUbON 


FOB 


SU&O^F 


FDD 


SAHC 




Pa can oi 


which 


% a o 



\0 C0D€ 
\t 

\3 

^d 



dlBSd.0,0,0 9CT ITALIC nOOC 

• 1933.0.0.0 CLEAR ITALIC rVJK 
01Ba3,dlB«7.0,0 BOLDFACE 
•)B46.0l»4B ( ( O CANCEL BOLDFACE 
dl»20,«3100,0 ( UHD£«LlNi 
01B2D. 3000,0,0 CANCEL UN0E*LlN£\3 

• lB53,03o*?P,g,Q SOPCA6CHIPT On ^♦ 
•1B34,d 1200 ,0,0 SUFERSCP1PT OFF \7 
d)B3).0^tOF,Q.O SUBSCRIPT ON \B 

01B34. 01200, 0.0 SUB8CMIPT OFF \9« SUB- AND SUPEP- OFF 



o* iti" CPCON can bm r»con*i^w'*0 to any printar coawaand 
oftao noodoO. 

Ron and I havo t>**n fri# n o» amea tna aid PO a and 
occasionally mor*> on project! together, Ron itaa doaagnod (and J 
**vm Ma porviaaion to pub 1 1 ah) a 12 bit A/0 con«ai tor uamg a 
National A0C1210, and 1 haw daaignod a 12 bit D/A con v *rtar 
uotng an Analog Oovlcoa AD367K all conatfuctvd on « Tnon«a 
ln»tru»antat ion «P- I p«a^d for tho B»30-t bui, would yev bo 
tntaraatod in publloMng an article concerning tno hOrd M ar« and 
0)O4t M aro noceaaery for tho dowico? It could ♦.all pnd up being 
tour or five pagaa long t»Y 1 1 •»* the diegra** are all added. If 
you nova any inter aat pi aaew let *»e know. 



• incpvely. 



Albert rlctanjel 
Aaaociata Profeaoor 
of Che*»ietry 



• 5-SO but pHPitfd cooputar nardwaro trabiao tho •riir* to «row with t»»a naodd 
of tha v4t<. 

• ffcf dovolopaont 9Y%trm conoola can doublo at a total not wh*Ch vaulOttt tha 

wolt 0K«n uiad lotwrat of ^c 40m»3, 

- ?.0 Wl aC&SOd, )6K SMOS STATIC ff«M, waaory aaopvd v< dao dliploy^ twin OS-232 
tarsal oortt* <antron>ct Parallel prlntar Port* tereinel/ecdee port, battary 
backtd clock calendar, and orogrjnabla tlaer are ill standard. 

a Twin obvbla »<da<L doublo dfnt1(y # *0 track dtit drival with a coeOinod 
forwettod ttoraoa taoadty o* 72o«. byt#» *r* ttanoard. 

• ST-oXH lyttia aonltor^ tKo '?L|I* dilk Operating tyitaa, MaCI oo-raildant 
adftor/atttwblar^ xH»Cl oo-roiidont ad<to*/0503 cron aataajbltr, Pt/9 

co-rtftidant ad1tor/co«»ilarrtracar 4nd JCIIblTOl 111 word procetftt*g toftwon* 
»r$) all included at ttandord. 

• Hardwart opetont 1n C tud» an HCK-4M *n1«rf jta # t> €J»*0P prograooar, S12 * *M 
graphici dliptay Interface* and ^ty general purpoee I/O board*. 

• Software ootlonf include the entir* 'fLel' iof twdrd library which inctvdea 
editort. atieaplero, lallci, cro«t^e«teat»lare. coapluro, tpalling chacaaro. 



tfUl* \t a tr*daaera of Ttchnlcal tyiteoa ComuLtanti 
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The Best 30 Pin Floppy Controller You Can Buy! 
The ELEKTRA Super Floppy Controller 



Run: 

5" 

8" 

Single Sided 

Double Sided 

Single Density 

Double Density 

5" and 8" 
Mixed Systems 

1 MHz 

2 MHz 




(8" Double Density must run at 2 MHz) 



Phone 

AAA Chicago Computer Center 

Technical consultation available most weekdays from 

4 p.m. to 6 p.m. C.S.T. 

(312) 459-0450 

120 Chestnut Lane, Wheeling, IL 60090 



See our catalog and ordering information on the next page to your right. 
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64K 6609 Computet 
2SSK 6609 Computer 



20 Megabyte 5" add on Winchester System 



HELIX 

$2395 00 &4K fUJOu* Compute* $2495 00 

2695 00 256 K 60004 Compute* 2995 00 

Qiner systems available 

$259500 

64K CMOS Static memory board with battery backup 3*5 00 

QUIA b and 8 Floppy Controller wilh buiM m Winchester controller I O 695 00 
DMA 5 ind 6 floppy Controller 1495 00 6609 CPU Board 495 00 

16Q06 board lo* SS 50 SWOP CP ^ 66* 350 00 

► MeedFLFJ* UfufLEX O S 9 Level I t» OS 9 Level I ■ "> We irt«n * ^»tem iijr you' 

► tlfRTRA COMPUTED CABINET THE LARGEST SS-50 COMPUTER CABINET 
AVAILABLE' Made ot heavyweight 990 (hie* aluminum Interior it 16-1 2' wide by 
2VTv8" deep by 6-0/4 rugh Heavy duty AC hnecOrd AC iuwhrnJn tWH.Hi" Fin 
w*ih hrier Bees pane* has tOcukxnts »Of O type pete connector* Front panel has hay 
prvpff powsr switch, 2 (Kuimmitd push button switches I Reset and NMrk&oM). and 
two cutouts to* M 4 d>»k drives $250 00 
Fitter Ptelolor 5- V4" drive opening $1000 FanFiiter SfOOO 
POWER SUPPLY Highest Qutiiiy linear po war supply CONSERVATIVELY raledei 15 • 
.*«» 3i9>6v..Uid is* 3 pumary inputs for light reied. and ***** loading 
J20vVeSl0n $20000 iiOV version 117500 
OtSK REGULATOR BOARD WITH CABLES Standard wvon tot 2 floppy d"**! 150 00 
Heavy duty version lor 1 Winchester drive and 1 floppy dn^a S75 00 
AU JUARY POWER SUPPLY lo power MC nd WmcAaaiar drive Si 25 00 

► ENQINEER I "FUN BOX" BY ELEKTRA Computer cabinet win h*n quality 10 amp 
posrer supply, EMi fitter fan Large enough to notd the standard sue SS-50 type 
motherboard $226 00 
ELEKTRA USjaytfSAL SaVlaVSS-MC s*OTHB»BOAR0 »»«»«a»i i?5 ih<h 
i| k>ng by 9- vede > i fWTKHy r»0 p^i slots 6 iO (30 pm| slots Cbmp*j*e address 
decoding and select ton aa well aa extended address capability lor I O Dots Choice of 
4, 8 of IB addresses per > ; Hoi 1" spacing belween felt memory and I/O lloH On 
board baud rate general wilh low and n.gh rw>g»i providing H' m (* ieitfCtahferaie* 
o< 75 tmougn 38. 400 for each ol rne five baud raie im« **©» oevceeirCu iryperm«lt*ng 

1 Mfu 39 pm disk controller* to run win 2MHi io p,n CPU boards 

Mounting hardware $5 00 Baseboard w documentation $60 00 

Kit w/goTd connectors $320 00 Assembled wgoid connectors $360 00 

Kil w/fcn connectors $240 00 Atamblad w/tm connectors $300 00 

ELEKTRA CHASSIS m lodes cabmai 1I0v powe« supply poww upply cables 
aLaooVd disk regulator board with power cables, moihe boa d +tin g id SQua;e 9<n 
connectors, assembled and lesied $850 00 

ELEKTRA CPU S/f Use eiiner 1*6 6602 or 6006 (10 run 6600 software) or 6609 Has 
provision for upio3 27i6Eproms. ik scratchpad MC6640 tuple timer and an oPdonst 
baud rala generator providing baud rales irom 110 thfough 36 400 baud in two user 
selectable ranges. Version! of OS-9 »ey#i i are evwtabie 

Rareboard $50 00 K>1 $225 00 Assembted $275 00 

Optional Baud Rale Onetaior $25 00 

ELEKTRA OPS DUAL ORT SERIAL CARD F M 1«e slandard »mn SS 50 bus I O stot 
Can be configured lor 4 or 16 addressee pe« port RTS CTS DTR DCD IRO 
FiHQ^NMt, and baud rale can be appropnateiy tmpiemenlad lor eecfi pori 
Barebos/d $2000 K»i $60 00 Assembled $80 00 

Cebte «lh mounting ardwara (Iwo needed per board) Each 125 00 

Cabfe Eacn 20 00 Mounting hardware par ceb*e $5 00 

ELEKTRA OPP OUAL PORT PARALLEL CARO Fits the standard 30 pin SS-50 bus I/O 
afot Can be configured lor 4 or 16 addresses per t/Q not The direction Of the TTL 
btilfers can be controfJed by nl er on board lumper o«nectr>aor by angnat iromtr>e 
peripherali The »ntarrupi requesl line tor «t£h pprl may be individually jumpered to 
eiiher the IRQ Q< FlRO^NMl bus line 

Bareooaid $20 00 Kii $50 00 Assembled $60 00 

Cebte wdh mount>ng hardware (two needed per board) Eacn $2500 

Cebte ech 2000 M untmg hardware p r cable $500 

ELEKTRA 64K STATIC RAM/ROM MEMORV BOARDS with gold connoclore Ifm 
svaitaMei Assembled and lesied ireth &6k Ram $269 00 wnn 64 k Ram $299 00 

t- ELEKTRA UNIVERSAL SUPER FLOPPY CONTROLLER TME BEST X PlN FLOPPY 
DISK CONTROLLER THAT YOU CAM BUY' Controls up 10 Kfcir 5- 1 4 dnv*S and four 
6" drives tor a lu1»l ol aighl myslem drives rFLEfc ijilpm i-mif [\ fpur diives i S'ngle 
density or double densely iMHf ot 2MHf 6600 or 6609 iDduble density fl nnust be al 
JMHj an oinpr comb* n*l ions ol yprrofmsnte ate posubte ) Analog phase locked loop 
dais separators wiin separate ad|uilmenti tor 5" and 6' dmes Analog wnte 
prBCDmpensalion ccuit wi|n separate adjuslmenit lur 5' and fl drives Designed io 
nwpl Ihs data hold iequ<r*men|i ot VYeslef n OigilSl (loppy controller IC Assembled unc 
•esled $275 00 

Disk wild dnvera a^d lormattmg uinrtiea 4 Specify 6800/9, FLEX/OS-fl) 3000 

r> ELEKTRA WINCHESTER SYSTEMS THE BEST WINCHESTER SYSTEMS THAT YOU 
CAN BUT 1 Has automatic error deieclion andCOPHECTtONoTupIO 11 Oil PurSl*#rorS 
SS 50 bus. eitanded addressing CApefel.hes. OMA on board sector butter drivers 
included lor 6609 FLEX or OS-9 Specify ^nose verswn of FLEX that you are uimg 
Of. vers for FLEX2 I6B0OI are available lor an additional $100 00 Ptk* mciudes hoel 
interface controller, dirveis) and csWes 

1? Megabyte unole dnve sy* $2295 00 2a Megabyte dual drive sys $3595 00 
19 Megabyte single drive sys $2995 00 36 Megs byte dual drive syt $4695 00 

{ 19 Megabyte drives are the largesi thai can be aupporied by FLEX 1 
ELER TR A H0-$ Cabinet lor dual 5 1 /4 floppy drives with power supply line cord fuse 
pow r Switch, and power cables to drives 15000 

► ELEKTRA HO-BW As above but with EMI litter fen and r«4vy duty power supply 
Powers I floppy and 1 Winchester 19900 

5 nbbon cable lor dual outboard $-1/4 duN drrves 40 00 

2 ribbon cable lor dual inboard 5-1/4" dtrjh drives 35 00 
Custom c Dies available Phone 
ELEKTra ND-i Ouai diwa cabinet £Mt tiller tan power suPPiy and power supply 
cables 'o r 8* drives 350 00 

6 rjbbon cable lor dual 6** dies drives 45 00 

► ELEKTRA 30 P»N PROTOTTPfNO BOARO 20 00 

► ELEKTRA SO PfN PROTOTYPINO BOARO 40 00 
DOL0 10 PfN CONNICyORI (Specily mala with SRi^ara pins or lemalel 1 50 
TIN 10 PIN CONftECTQfll rSpeciiy maie wiin squere p»ni or lemalel 50 



ELEKTRA is a iradjenarS ol AAA Chicago Computer Center 

HE* and LMipLSX aie iredemarkt ol Technical Systems Consonants tnc 

HELIY "S * liitjemarfc r^l Ha/«i*aDd Cornpulef SySlems 

OS-9 and BASIC Ot are tridemarka q1 Microwsre Systems Corp 

Dealer lor ELEKTRA HELJK SSB SvYTPC Micro^are Systems Co*p 
and Technical Systems Coniuirairi inc 



AAA CHICAQO COeSPUTEA CENTER 

120 CHESTNUT LANE ♦ WHEELING. IL 60090 13121 459 0450 

Technical consultation available 4 PM to 6 PM mosl weekdays Closed evenings 



Our 
pnw 

ql pur 



ELEKTRA ' ■OBTVAAt t Am o* pur softwera is copyiighled mo In rranrs arereser ved 
Source is e>l her supplied o* optioneey a vattaesa el •» t re coat so that the pu re newr can 
modify our progreeia «or his owh use L«cenS«ng however rt required for eommerciar 
resale ) 

SUPE UOOCaJ PROORAM Single cna/ecter commands No interrupts required 
Transmit manually or trensma disk titaa (lent) ol any length id diSiani computer 
Receive and save dish Mes (teaii on iotai disk iyitem x on jc^o'tsuppDrsed Tested lor 
lull duplex at speeds up So 9800 baud HaM duplex option Echo opl«on Repi*ees CR 
with CR'LF (user option) Slow d sk file transmit option 
Please specity 6600 or 6809. SSBOr tLGXt*. 5' or 8 

instruction Manuel ahd diss w tn both source and oblacl code $7500 

STAND AR D MOO EN PROQR AM Same ea Su per Modem Program bove but wtlnoul 
ECHO option. CR/1F for CR option, alow disk tile transmit Option n r X-ojvX oft 
option specify 6600 or 6600 

Manual wilh instructor's, source hstmg. and How cfiart 10 00 

e>. OS-9 ConllguraBle MoeVm Pnw#ssst (Sorry, source is not available) lOOOO 

ORDER - WRITE UP COMPUTER PRO OR AM Screen oriented wnle up Iprm wilh 
cursor ednmg d«k saw and load primer command using eesiry avanebte universal 
print -out torms Phone lor more dPans A*e»ieD«a for 6609 FLEX $100 00 

ALL IN ONE 

Editor — Teal Processor — Mailing Label* — Mailing Lists - Muinpte Form Letters 
Use any CRT terminal and p/mter — Best Pachage For The Money Anywhere' 
Specify 6600 or b6Q9 SSQ or FLEX" 5" or 6" 7500 

Printed source luting is available lor an additional 35 00 

AJl-ln.O»e, Wnte'n apeif and Spell n Ft a pecksge 250 00 

6ofh*u* by Tetrwilcal r -_ — FLE1{ TM) <— uneTLO(TM) - 



inc. 



tans) 



100 
ISO 
175 



150 



I Guts* <USl) 
Gen COS /Edit 6 ASMB 25 
SWTPC DOS w/£dlt 6 ASMS 
Advanced Programmers Guide 
Edrtor 
Assembler 
Oeoug 

Extended Basic 
Bask Precompiler 
Son^Merge 
Utilities 
0»ign©StlC» 
Ta»t Processor 
66000 X ASMB on 6609 
Peacal 

Rel ASMB/Lir*mg Loeder 
6600 XASMB on 6609 
Cobol 
Fortran 77 

BoftteAYeby MScvewSxs 
SystsmsConk 

OS-9"* Levet One Operanng System 
OS^9- Level Two Operating Sy 1am 
BASIC09** 

OS-9"" Macip Te«i Eotiw 
OS-9"' Inhtreclive Assembler 
OS 9"" into aci.ve Debugger <0i»k version) 
CtS Cobol Compiler 400 00 

Pascal Compdet 10000 

"C Compiler 



25 

25 
25 
25 
25 
25 
25 
25 
25 
25 
25 
25 
50 
- 25 



. r UWLU|T M | . 

Object] [ AM Men Owecll 
w'Uen Milan OHy - SSa* | 



tnc 



250 



250 
150 

50 
50 
75 

too 

50 
75 
75 
75 
75 
250 
200 
150 
100 



OHy 
100 



20 50 

10 25 

20 35 

tO 25 



10000 



RurvTtme Updese 
Package 

75 00 

75 00 



50 00 
100 00 
10000 



20 
20 
25 
20 

30 
5 



35 

35 
50 
36 

75 
66 



Source Menus* 



200 

150 
150 
150 

150 
300 
300 

175 

750 
450 



Microware ydarfy suppoii senno ($20000 lor OS-9 Levet 2) 



400 00 

N/A 

N/A 

300 00 

30000 

too 00 

N/A 
N A 
N/A 



4i.) U0 
4000 
2500 
15 00 
10 00 
1000 
8000 
4000 
4000 



OHett 

w/ftian. 
200 00 
500 00 
200 00 
125 00 
125 00 

5000 
900 00 
400 00 
400 00 

75 00 



ISO I 



2K 6609 MICROBUO 30 00 4K 6609 HUMBUG 7S0O 

2K 6600 HUMBUG *0 00 4 K fiflOO HUMBUG 6600 

Other HUMBUG ve*s«ns including video versions are available 

Spell n Fi by P#ie* Stark >76 56 Wntan Spetl by Peker StaiV 75 1 1 

Aifn-OnaL Speiin Fn and Wi«tan Spetl package 25000 

Dynamite Disassembler 60 00 

SUPER SLEUTH OrsaasemWer Sysiem i$l0l 00 for 0&9 version) 99 00 

S4VDO DISK DRIVES 1 head 2 heeds 2 heeds I need 2 heads 

30 day guarantee Tanoon Tendon COC MPt MfN 

5- M . 40 tracks 225 00 300 00 300 00 25000 32500 

5-1/4' 60 iracka 30000 37500 37500 32500 40000 

M lor COC Service Manual {Spaoty 40 0t 60 I rack} 2500 
6 77 tracks DS/OO Oume OT-B $650 00 Remek iSpeetam 35000 
►• SPECIAL ■ 

' U S Robotics 300/1200 baud auto d*i/au«o anawer modem 99 00 

■ Same as above boi wvihoui sail test and diagnostics 39900 
4 U S Robobcs 1200 baud direct sowed auto answer modem 34900 

■ Ha/eltme 1420 CRT terminal (newt 375 00 
1 SSB BFD Floppy f>sh Controller (Version 3) Run FLEX or SSB DOS 10000 

■ SWTPC #X Memory $15 00 MP-B $40 00 MP. A with MP- C 3500 
' Hioh speed tape reader SO 00 AC-30 $40 00 MP-S 6000 

* 300 Baud acoustic modem 129 00 

* 10 ELEKTRA DO r 0»sks 3600 10 5" DO Disks tn herd bOn 509 

* Tf 610 rmter w/lowstr case and luff vertical forms CO trot 1200 00 

* Microhme II Cdlencar and Oock Board (Assembled) 60 00 
01 MIX CLEARANCE SALE OUR OUR 

«-<ST PRICE LIST PRICE 

■5 6600 Plus CPU Bd 576 05 475 00 6800 CPU board 2 4 03 100 00 

Cabfe (Ser Or Par 10} 24 95 70 00 Motnerboard 20000 

Double d 11k reg card 66 22 50 00 8 Port Serial lO Bd 318 46 25000 

32K memory board irsOO *26 com ro4 wQMX Flea 328 26 27000 

6a K memory board *7&&! 450 00 56K memory board 42500 

B0 X 24 Video Boards 396 78 250 00 Single pn ter 1 cable 113 36 9000 

6e x 18 video Boards i9S7t lOOOO Oue» pn par 3 cetvte 136 32 tiDOO 

iM Mem Bds w/cntrtreg t4$00 4A P#D PROs* Bd arid burrw* 1ODOO 
93L42 RAM chips (2 needed for GlMtX DAT) each 20 00 
SWTPC 

DC-4 6-1/4- Disk Controller 23000 SWTC6609FL '• OiSk 6 Man 3500 

MP S3 Dual Port Serial 12000 MP L2 Dual Port Piiallel 120 00 

MP N Ceicuiaior Board ia.nk 54 95 MP N «astembtedi 9200 

MP- 2716 Eprom Programmer l'«50 MP.09 2MH» 6609 CPU Board 295 00 
s Ms Msf ManM Broedoeeeng 

DC8-4A Double Deosiiy Controller Board for 6" and 6' wilh DOS 54900 

S5B DOS iSpecty 6600 or 6606 BFD or DCB-aA. T or 6") 7500 
SE92 SAW 5 (6609 Edits Asam tor DOS) 



ium order $20 00 Shipping and handling estimates *nti.n the Contr 
U S add 3% (M I Nl M UM $2 50) 11 n n 01 s r as- deni s add 6% sales lea We wil I rwlurxl 
overestimated shipping and handling charges Forefgn shipping and handling 
0% (MlSsHAUM $10 00} Foreign orders m u ti be prepaid m U S dollars CRecks 
be drsasn on a U S bank Heavy foreign items will be shipped an freight cgAeci 
e Phone between 4 PM and 6 PM weekdays rt Queibons anas regarding shipping 
Mejfe* CAjtge, visa, and Amencan Eipress honored 



330 Monitor ( Specify 6600-6609 $6006 $E006-$F7E6| 

SSB version of FLEX^ {without Editor and Assembler 1 

lM8-ia Motherboard 

SC8-69 6609 CPU Board 

PAfl-1 Dual Pod Parallel Board 

SER 2 0uai Pon Sena) Boe/d with 2 CAbtaa 

Chiet90 64XC mpuler System 



6996 
75 0O 
15000 
39900 
39900 
69 00 
12900 
2195 00 



okMy We are not araffad to enawe' lecnn^cal inqutnee through the n^ 1 
for Mchrucai *mtp dunng ihe hours indicated above Tr»e S09 frequent changing 
inventory and prices makes H uneconomical to pubhsh a celeiog Out sOs ere 

O chau>gp «M«nout 



to serve mai purpose Prices and inventory are suosect so 
advance notice 



WARNING AAA Chicago Computer Center doee not provide repair or diagnostic 
service lor cuslome* assembled kaa AAA Chtcego Computer Center does warranty 
a*d maintain, service lor our assembled boards The customer should carefully (ikemio 
consideration the small differential eePeralmg oui kit end assembled prices when 
making run chorea 0' purchase 

vre hpve introduced our line of computer eqtwpmmvu «*m me psprpo ssj pi oRssueg the 
highest quality of components possible as eRordbbSe prajea Theee orOTAans are 
intended lor OEM appneeuons where »t is the responsibility of Ihe purchaser to 
integrate cheee components with turssBe ne* ivy. disk oomroAers, drrvea and 
sohwere along wrih I/O tarmmati to form working aompvser iitasri* 
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MlCROWARE. 



PRESSRELEASE 



ASJS TA D8VRBC t*ll d>lv« r*a; 
858 D€L?8 
MA OX 



Saftaabar H» 1f|) 

»•/■ :• unti ••!•■■■ 

Caatacl lad* Pall , >13**7l*ll" 



ItTIITilTYll? P«Ct I 10* tTaXLAlU PCI OdUf 



pr*j.'*a* »rliiaa la ■■•liOt par i*« oa-t o?araiia< 37* «* tm 
saeiaia aaaeiata aP gaaaa aad attar utirtttui imrui tan an 
aal aa«f aatanaleiat aal aar*« a» aacallaat laalractioaa; 
• nail** «r taaiao* im^imIii taahaiataa ax: ireiru* laeiad<a 
aaapiaia laaleof aei»rt* fiiaa tat aaa a* •■■lip niKi t« rmn eo 
attaCt'C alataagaarla ar |r« r aict terafaala, 

TM prairiea laaladaa ia ta« »•»**• *r+. 



Ill 



Clfe ■ trasaieai diapiai »r ■ aall ala«« aa fur larolael. 

Pea* . GraPaaaal rati at **** alealatad irastica aa etaadard 

taraiaai ■, 

llli* • laaiaCt aaralaa af lb* faeava arlficlal leialliMnca 

iHuUtln of aalaral latmaga a 1 alette alia ■ peyeaiatfiat. 

Itlky * rr*tr»» t*al ontitt Qrlgloal 'Itllu', tlovlat 

Jataaaaa iriai 

dtiaai . ■ e*al*'ld»aatk»rai *aea 

lata . Clad ?a<i aa» a«l ar a e«af>uter<~c4£ar atad ■■■• - Proa ■ 

pjt'» aalai eP ataw. 

teaara - ■ AraPetcal llaplaj af t* • aelutlaa *o tfca 'Taaar ap 

laaol* putala. 



Altfto^fn ail other isiuea Including RovewDer 4 * r\*v* err wad 
OK, t <uim t&* Octooar *81 laiua of 68 hlcro Journal got loat in th* 
pott. I can't do without ey eonthiy ration of helpful hint* *o pl«a>* 
aand another copy. 

t end as* detalle of a aetnod of reading JVK? track disks 
on a ays'aaj fitted only with 80 track ariw*. Tr*re tiaa been '.ilk In 
the Journal tnat tm» ajifnt m pesalble but up to no* you haven* t 
puoltihed detail* of how to do It. 

How anyone could hav* a ayetea with only 80 track drive*. 
It ***n*t he*n practical before Dacaua* eoat aoftwara la supplied oa 
'Star (Sard* >5 track diska. 



MCClflP CUZML TiLt r»i jep-£ 

to read/ write *.<, tree* di*k* on 80 track drivea 

I know it shouldn't wor* in theory - So* Hon Andersen* 
coeavMi in tn« ma* 8 J laaua ■ hi it doai fcr ■*• )iiat in cat*, one* a 
Ha* ia rofsatird to BjC track* 1 arat it to thai Torut* 

Hi Ui tha two Mw rouiina* d*Uil*d brlw lncorporatod in tha 
GantraJ FLEX diak drivara In plata of tha amstinc SCOC and DW 
routinai th# drivaa win t*Mv» «glt* norral*>- Hhar. you wiatt to raad 
or writ* to a 40 track dltk Haply pui tna diaa in drjv* 1 out tell 
FL£X it* in driva ^. For ataci'ia, tntrrint L!l* J-TtST would Hat tha 
flla ttST + TIT rpoa a *0 li-KJi d)ak in drlwt 1, 

1 don't ihinh t9 MlCt: would nut! lath th« FLEt flrivar* in full 
but luckily wa only hard to than** two rouUntt u fcllowat 



Labals of aktimaU routinaa ar* aa in to* Oanani FLO 
ntatlon. all tha othtr drlvpr row tin** art unait*r*d + 



■ mek seek nouTiite 

$LIK STB aCCAES 
U&* 0KL?6 
TST FLWO 
SCO SEEK) 
ASL TRKREG 

LUR pcua 

ASIA 
S££X1 ST A PATWC 
LBS* KL?8 
LP« CI<B 

s a ooroec 

LBS» 0CLI8 

bs* n«n 

TST FUC40 
ato sitit? 

LSH THIHI& 

L83R DCLW 

SOX? 8IT1 1110 

m 

FLC40 fd 

• aXW PRV KV771T 



Sat aactor 

lat 1771 dlB«*l this 



aklp If fla«t not aat 
double the Ho. In track rag 



Oouola r*4d track count in A 
Go find a track 



Sat up SMk CM 

tall 1??) 



aalp if fla« not aat 

alaa halva the Ho. in track rag 



DPvj 



CLU ft-GAO 
LDA J.I 
CTWA 13 
iLS D*t? 
CL^A 

8i> FVDT1R 
LPC TMFEC 
STB 0,1 
ST* CVFDRV 
tS»l FNDTMK 

sra : m f.f : 

B5N D£L?8 



TA FL040 



prasat flaa; aach call 
t«l dri«« Ho. 

Ol if ) or Jm 

aid* aat drlva 

point to old drlva track ator* 

t»t currant track 

aav* it 

a*i n*w drive 

point to n*w drive track ator* 

t*t track in a 

tall track rai 

ia n*w drlwa Mo. 2 
\T not lea»* aa It la 
Chmcr 2 into 1 
•at tha flai 



-a^e-^tf 



Barrie 8 Smith 
1 Ball* tu« 8d 
Haroe Bay t K*nt 
8»«land, 



CLOCK (RCNAMCO "CLOCK- ^»Wk "TI***!'* *JMEN >*OOIPIC0> 

TH1« p^o&yoat pr-lnta tha> day, data, and ti«aaj on t/>« 
conaolt. It gata Ct># day, data, norrtn, and cLmb 
p"ro» tna) S6?87 raal tlna clock. Tha ymmr Co* a a 
Proa a) 8-byte) wn in o%« CrHi'o C**08 "AM ■cratehptd 
aha)n« It la atorid, Tn 1 a p** Qrom uaaa •xtarhal 
rowtlnaa only fro* 0HKBU0-.08 and la tharafora 
tndaaandant of any operating ayataa. 

8aing Indaoandant of any oparatlng ayatam la Ita 
gr-aat banaPLt. It can «van be accaaaad by 
interrupt ifvLea routine* end eaPtaara «nicH 
mod if* Lea your operating eyetea) (end iona dot). 
Qelng M«ory raaloant, It perforata quickly enotigh 

progreaie. In thl* application, It aacild hove to 
nave Ite output redlreetad. I uae it to generate 
a tl«aa Una on the 25tn line oP ay Meeth M19 
termlnel at eLther one eeeand or one alnute 
lntarvala. 

Thle program la eeeeaeed *lth a JflP» to Ita beae. 
addraaa. Thle verelon La Inetallad at S£*40 In a 
reconfigured Oleia 8609*. It can pa raleeatad 
aleeahere by changing only the OftO i*armm* mr%4 
raaaaenbllng It. 



CLOCK le e acidification of the TImE progrea . 
T1*C progrea aaa arltten by I 

BIHia, INC. 
t887 WCSf 37TH "VACC 
CHlCAOQ, ILLINOIS aOSOS 
(81«) ««*F-9910 



The 



thle verelon 



to be relaaaad Into the public domain, 

-odlf icetlon -eaof-di 

MOOIf ICO WQm aCLOCATIOH AT OPW $F0O0 ANO *8 A 
9U8-P*00*am HOOULCi 21-ewg.a3 

•nil ip C, Paunrt 

201 N.therfleld 

ConetOCk f>erk ( Ml. 49321 

MOQIflEO TO ee tHQlPtMOZHJ OF FLElc, USE GttXeUG-09 
■OUT INCH. ANO RE9I0E IN CMOS MEH0*Tj 

•hillp C. *unn 22-0CT.B3 

Modified for lnatolletlon in um>*ed ChOS ecratohped 
at 8C«*0 - SE8«2i 

•hi lip C. Mono 24-0ct-B3 



• eauATEi 






OUTCNFJ 


CQ0 


IF 60 A 


BINOLE C«A" OUT 


rflTMNO 


EQU 


iFHiO 


OUTPUT CFJ/LF t STRING 


■CP»LF 


EQU 


if soe 


OJTPUT CFJ/LF 


F8FAC8 


EQU 


1FH18 


FFJINT A 9FACE 


BYBCLIC 


EQU 


BE HO 


CLOCK BASe AODnCBB 


TEA" 


EQU 


fE«3B 


YE*" BUFFEfl 



• TAUT OF FflOOPWl 

0*W 8E440 



FLAO 
■TINLOC 
CLOKFJO 
OTIalLOC 

0,T* 



LBN I 
AIM.B 

LOX aOYLKUF 

CO* 8.X 

FQATA 



CLFJ 
LOX 
J8FJ 

lot 

LOB 

qcca 



CLEA" AH/PM FLAO 

POINT TO TIME AfAT.4 IN FJAM AT $F1F0 

"EAO CLOCK 

POINT TO START OF BTRlNO AT 8F1P0 

GET OAY OF alCEK FRON 8F1P0 
AQJXI8T FOR LOOKUP 
VALIO OAY? 



LOB 



O.Y* 



CiaPfj) m 10 

BLO Tiaazi 

Caaafj *V 

L8L0 ERROR 

■88 
811 
LBHl ERROR 



SHIFT fOR 2 BYTE TABLE 
POINT TO OAY LOOK U* TABLE 
POINT TO BTRtNO 
PRINT OAY OF wet* 

OCT MONTH FROM SP1P1 

A0JU8T FOR LOOKUP 

IB IT t QiaiTBT 

PdOl DON'T AOJUBT 

VALIO MHtr> 

NQi ERROR CLOCK NOT BET 

AOJUBT FOR NEX OFFSET 

VALIO NONTHT 

MO I ERROR 
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t t ne i «slb 




UH 


JMMLKgf* 


L0* 


B,M 


LBS" 


*n*TA 


LOA 


- . * * 


BSR 


autavf 


LDA 


■ • r 


JSP 


[OUTCMP] 


JSP 


[PBPACE] 


COX 


arEAR 


LBS* 


POATA 


JSP 


[pspacei 


J»P 


IPSFACE] 


JSP 


[PSPACE] 


JSP 


t PSPACE ] 


LOA 


0,V* 


CmPA 


•S23 


LBWl 


Eppor 


*SH1 


A 


A NO A 


•$e 


EOMA 


»*c 


lbeq 


ERPO* 


PULS 


A 


TBTA 




ene 


NOTNIO 


LOA 


• Si* 


an a 


TIMES 


NOTHfO CMFA 


■112 


OLD 


TIMES 


sea 


TIMES 


CMP* 


■121 


SHI 


AOJUST 


CMPA 


2120 


0LO 


AOJUST 


SUBA 


IS 


AOJUST SUBA 


■ •10 


BUS A 


■t 


MNE3 INC 


FLAG 


TIMES SBR 


OUTOVT 


LOA 


■ • i 


JSP. 


[OUTCn*] 


LOA 


0»T* 


SB* 


OUTOVT 


LOA 


• * l 


JSP 


{OUTCMR] 


LOA 


0,V* 


bsr 


outbyt 


TBf 


FLAG 


BEQ 


AM 


LOX 


•PNM30 


BRA 


NSOOUT 


A* LOX 


■AMHtB 


MSDOUT J3R 


PQATA 


FINISH NTS 





• OUTPUT BVTE 



SHIFT POP 2 BVTE TABLE 
POINT TO MONTH LOOK UP TABLE 
POINT TO STRING 
PRINT NOWTM 

OeT OATE FROM SP1P2 
OUTPUT OATE 

OCT COMMA 

PRINT COMMA 

PRINT A SPACE 

POINT TO YEAR BUFFER 

PPINT TEAP 

SKIP A SPACE 

SKIP A SPACE 

SKIP A SPACE 

SKIP A SPACE 

OET HOURS PPON SP1P3 

ILLEGAL TIME? 

VESt PRINT EPPOP 

PPESEPVE A 

MASK OUT MICH OPOEP NV88LE 

ILLEGAL TTmE-> 

VESt PPINT EPPOP 

RESTORE A 

MIOnIGhT"» 

riO l THEN OON'T AOJUST 

MIDNIGHT 

*N0 PPTNT HOUPS 

AM OP PM? 

AMI FLAG ALREADY CLEAPEO 

IF NOON OON'T ADJUST 

22 OR 23 HUNOPEO HOUPS? 

YESl OON'T OO OFFSET 

20iOO HOUPS? 

vESi OON'T 00 OFFSET 

SUBTRACT OFFSET FOR NON-HEX 

AOJUST HIGH 0*OC* NVBBLE 
AOJUST LOW OPOEP NVBBLE 

SET TO PM 

OUTPUT HOURS 

OCT COLON 

PRINT COLON 

OET MINUTES 

OUTPUT MINUTES 

OCT COLON 

PRINT COLON 

OET SECONOS 

PRINT SECONDS 

Ah OR PN7 

IF AN POINT TO AN ME5SA0C 

POINT TO PM MESSAGE 

BRANCH AROUNO PM SET 

POINT TO AN MESSAGE 



JULV 



FCC 

FCB 
AUOUST FCC 

FCB 
SEPT FCC 

FCB 
OCT FCC 

FCB 
NOV FCC 

FCB 
OEC FCC 

FCB 

OVLKUP FOB 

NNLKUP FOB 
FOB 



/JUVV / 
14 

/AUGUST / 

M 

/SEPTEMBER / 
14 

/OCTOBER / 

•4 

/NOVEMBCN / 
S4 

/DECEMBER / 
14 

MON # TUCS,l*CO ,TMUR9,FRI , SAT, SUN 

JAN, FEB, MARCH, APRIL , MAY, JUNE 
JULV, AUOUST, SEPT, OCT, NOV, OEC 



* START OF 'CLOKRO' 



CLOKPO 


LOV 


#BvBCL«*S 




LOA 


0,V 




STA 


o,x* 




LOA 


«.▼ 




STA 


o,x* 




LOA 


1,Y 




BTA 


o,x* 




lob 


'SOS 


CLOKPM 


LOA 


0,-Y 


• 








BTA 


o,x* 


• 


OECB 






BNE 


CLOXR1 




LEAK 


-a,x 




TST 


avacLtcf 14 



POINT TO CLOCK fSE220*5rSE22S) 
OET OAV OF THC KEEK FROM SE22S 
STORE AT SF1F0 ANO OUNP POINTER 
OET NONTH FROM SE22? 
STORE AT SPlPt ANO BUMF POINTER 
OET OAY OF THE MONTH FROM SE22S 
STORE AT SF1F2 ANO BUMF POINTEP 
NUMBER DF BYTES TO TRANSPEP 

OET VALUE FROM SE224 , 3,2, 1,0 ANO 

OECRIMENT POINTER 
STORE AT 3FlF4,5,S,7,a ANO BUMP 

POINTER 
OECRIMENT COUNTER 
LOOP TILL OONE KITH 5 BVTEB 
5ET X TO POINT TO SP1F0 
010 IT CHANOE WHILE REAOING 

SYSTEM CLOCK tSE234) 
IF CHANGEO WHILE PEAOING, RE-REAO 
RETURN KMEN OOnE 



PRINT STRING »/0 C*£Lf 



RETURN TO CALLING ROUTINE 



OUTBTT 


PSmB 

PPT 4 


A 


5AYE 'A' FOR LATER 




LBRA 




OET INTO LS NVBBLE 




89 R 


OUTNVB 


OUTPUT NVBBLE 




PULS 


A 


RETRIEVE 'A' 




ANOA 


■ tOF 


MASK OUT MS NVBBLE 


OUTNVB 


AOOA 


4130 


AGO FOR DECIMAL 




JBR 


[ OUTCMR] 


OUTPUT IT 




RTB 




RETURN TO MAINLINE 


WEKTAB 


EOU 


• 




MOW 


FCC 


/MONDAY / 






FCB 


104 




TUEB 


FCC 


/TUESOAT / 






FCB 


104 




«ED 


FCC 


/MEONESOAT / 






FCB 


104 




THUMB 


FCC 


/TNURBOAY / 






FCB 


104 




FF-I 


FCC 


/FRIOAT / 






FCB 


104 




SAT 


FCC 


/BATUROAT / 






rem 


S04 




SUN 


FCC 


/SUNDAY / 






FCB 


SG4 




MONTAB 


EOU 


• 




JAN 


FCC 


/JANUART / 






FCB 


M 




FES 


F« 


/FEBRUARY / 






FCB 


14 




maRCn 


FCC 


/MARCN / 






FCB 


•4 




APRIL 


FCC 


/APRIL / 






FCB 


•4 




HAY 


FCC 


/NAY / 






FCB 


14 




JUNE 


FCC 


/JUNE / 






FCB 


14 





POATA 


LOA 

CNPA 
BEG 

JSN 
BPA 


0.x* 

■4 

OUT 

tOUTCHW] 

PtJATA 


OET CHARACTER 
ENO OF STRING"* 
YESl EXIT 
PRINT IT 
LOOP TILL OONE 




OUT 


NTS 




EXIT 






LOX 
JSR 
LSRA 


■EPAWS0 

tPBTRNO) 

FINISH 


POINT TO EPPOP 
PRINT IT 
EXIT 


MESSAGE 


ERRM94 


FCC 
PCS 


/erpop in 

4 


READING TIME, CLOCK 


NOT 5ET 


AMNBO 


FCC 
FCB 


/ AM/ 

4 






PNNSO 


FCC 
FCB 


/ PM/ 

4 






FLAO 


FCB 









T I NLOC 


EOU 
ENO 


* 
CLOCK 







Ronald W. 4nt*B*-aon 
3340 SturbriOg B Ct . 
Ann Arbv-i Rl 4BI09 

Nov. 13, 1TO3 

'68* Micro Journal 
P.O. Bon B4*» 
Hi>mk, TN 37343 

Attention: Don NflJI**)* 9r . 

Daar Don, 

I'vo found that JUST haa a Probta* runmriQ in m. CoCo. It i« 
• aiRpla «attar o* hiving put th» •ttck in th» *rov>g pl*£«. I 

had loc«t«d it n#«r tha av«d o# ^ »j y, *n4 no- find that th» CoCo 
u**« that •*-•• for- vidoo drivfr*, |»d apprvciato it if you Mould 
•««d th« folloMing patch to tha omart of JUST. It can ba fi«td 
toy changing on a byto o4 tho coos a* Allows: 



1- Uaing th* OTT coavi 

♦ ♦♦OCT jUST.OtO.O 



»* FLSX, 



JUST.C«D 



2. Uaing th« «onltor p <h« n ga thi t>Yta at *44rw*+ 40002 from 
• BO to 43F. <f»ao FLEX «mou«|, Procadwr* d*P«nda on Mhtch 
\»r%ioi% of FVCx you haw). 

3. Lfemg th» SAVSJ utility. H yo tho -OdlM*d JUST. 
♦♦♦3A^/E JUSTNEN. CUD. 0,0, 12 4F.O 

4. Now try JU8TNEM on a ea*t 4 1 1 m. It you h^v* dona avavythine 



68* Micro Journal 



39 



correctly tt Mill •**• k propwrly. A* tor trying it, d»lel« 
t*e old jUST.CnOr enO r«n«n« JUSTNEw.CMD to JUST.C«0, 

Incidtnti) t y , th» pate* do«« not *ake JUST i ncomat i b I • **ith 
SS-SO bhl «yit«ml tn «ny <*ey, *nd JUST Mill b* eupp 1 iw4 in th» » 
form from now on* Th» cnang* hm.% moved the 4 iyitn ltick* fro* 
■ B9FF to *2FFF. JUST <**Qht potubly inpind in th* *utur» to tefce 
jdv«nti<3« a* a l«rfl*f spv<i«l function tabl* for thw printer* but 
13FFF i« undoubtedly far ynough abowe program end at si?** that 
th»r» Mill o»ver b» # need to «jt/« it again. I mm truly sorry if 
*nyon» n«* b***~i c«ui*d «ny tnconvmiffncf by tn»» probtn. 



TOur* truly, 



Ron <Vidor son 



PRESS INFORMATION 



EDITORIAL CONTACTS* 



MOSTEK CORPORATION! TOM NUNAN 
l2lf)*bUm 



MOTOROLA INC.i 



S1GNETICSCORP.* 



LOTHAR STtRN 
(W21 994-631* 



MURRAY 5K0HAT 
(«0ft) 7»6-217S 



EXPANDED ARCHITECTURE NE* CHTP 
SUPPORT BUOAOtN VMCbu) CAPABILITIES 

Pnowiix, Ariaone. November X 19I3_ Protecting « market 
sizar of $7 MM for VMfbio ebrnpauMe proiSurts by 19tt, m a total 
microrzHrawt** board market of $2.2f>, executive* of Moat**, 
Motorola and 5 ignetka/PniLpi have announced technical agr««fnero 
on additional fccy elements of the »oUl VMEsystem Architecture. 
Thr newty-define* supporting bus wvrtwi rcludr a Ki g y-f jw d 
m e*n o ry expamkn bus, VMXbus, and 4 seli-arbitraiing rUfth- speed 
•trial bus, VMSbm, that may be optiianaiJy employed in sfftrrro baaed 
on Ac emting vMEbm standard* 

These additional buses join the P*»*< VMEbus interconnect that was 

originally introduced in October 1981, and has since been adopted by over 60 

vendor » worldwide. As a f urine f measure of broad industry acceptance! the 
VMEbus is presently beine, formally standardised by both the IEEE U» PlOlb) and 

the 1EC Gntemational Elecrt otechrucal Committee , based in Geneva). 

The VMEbus end its ei tension bus structures form the basis of 1 total 
VMEsyitem Architecture which simplifies integration of complete systems Irom 
high-fwrLrmance *-. L6-« and 32-bh board level system components. The tutting 
VMEbm interconnect standard provides the basic data transfer bus between major 
system components, while the vMXbus facilitates expansion c! local processor 
memory with very high performance characteristics. For rapid communication of 
brief ««»*ges between system modules, ttte VMSbus serial bus uses only two 
czv^xruvt (cioak and date) to provide aa efficient "party line* between system 
components* 

Mostek, Motorola, end Signetica/Phitips have agree* on detailed 
technical specifications lor the new VMXbus and VMSbus, for which documentation 
has been developed and made available. All three companies have agreed to 
produce a further high-level ^Cificatton far the total VMEaystem Architecture, 
promoting compatibility between VMEsystem products from many vendor*. In 
addition, the companies have indicated that they will be amouncjng tndrpcrtfcmtly 
developed products incorporating VMEaystem Architecture during 19M. 

Following the custom established with the VMEbm, the companio 



are placing the new bus specifications and supporting documents into the public 
domain, with no copyright or licensing requirements. It is believed that thi* policy 
will promote widespread availability of VMEtyttemompatible products, a* end- 
users and OEMs mcreaaingjy adopt VMEsystem Architecture tor their hsgh- 
performance la- and 32«bli system products, 

Mottek and S(gnet,cs/Philips both produce the 16/32-bit MtlOOD MPU 
originally developed by Motorola. While not limited in application 10 tSOOO-based 
systems, the VMEsystem Architecture has been designed to provide a set of 
sy»i em-ievel features decirabie for high-performance microcomputer system* 
where the MttOOO MPU family will be used moat frequently. Since its 
intraiurtion, VMEbus has been widely applied in industrial process control. Image 
processing, engineering work-stations, and digital network com munica lions, 

Additional bua-suppori IC designs in the MM WO family have also 
been announced to facilitate development of VMEsystem-compatible boards.. These 
new ICs mclode the 64172 VMEbus Controller (E-6USC0N), the *eJ?3 VMSbus 
Controller (SfiUSCON)r and the 64174 dui Arbiter. Of these, Signetics will 
develop the6aL72end6JL73 designs, while Motorola will develop the 6117% part. 

7 lie companies project that samples of these new bus eupport chips 
will be available in the second half of 194*. Continuing technical disrusaions 
among the three companies are expecasd to result bi definition ol additionaJ bus 
fuppott chips to complement the overall VMEsystem Artttiteciure. 

Mike Johnshoy 

707 Continental Circle, 1213 

Mt View, CA 94040 

<4!5> 967-2048 

DISK AND RAM DISK TESTING 



With the prices of memory chips falling, and 
companies I Ike Digital Research Computers offering 
low cost boards, It Is becoming common for 68xx 
users to have more than 64K of memory- Several 
schemes are In use to allow this additional memory 
to be used as a disk drive under FLEX, providing a 
great speed advantage over the standard 5 1/4 Inch 
floppy- While first getting my own RAM d(sk Into 
operation, I discovered the discount RAM chips I was 
using were not all good- The problem then was to 
find bad chips on four 64K RAM boards- The only 
means at my disposal was to run one board In my 
system at e time end run the standard memory 
diagnostics - SUMTEST, MEMCON, and ROBIT. While 
these tests did the Job, 1 cringed over the number 
of times I plugged those boards Into and out of my 
system In the course of debugging* 

My solution to this problem Is the following 
utility, DISKTEST.CMD. This utility tests aRAMDISK 
or a real disk - the program can't tell the 
differ nee since standard FLEX routines are used for 
reading and writing* The disk to be tested must be 
formatted first, since this utility reads the System 
Information Record on track 0, sector 3 to determine 
the number of tracks and sectors to be tested* 
Every track and sector on the disk will be tested, 
and the disk wM f require reformatting before It can 
be used again. Bad tracks and sectors are reported 
and testing continues until the entire disk Is 
tested • 

An Interesting feature of this utility Is the 
way It Is called. If your memory for utility 
command formats Is good, you can pass the parameter 
required <the disk drive number to be tested) on the 
command line- If you forget the format required by 
the command, the utility will prompt you for the 
Information required* ft adds a smell amount of 
code, but when your collection of utilities starts 
to get large It's nice to be able to operate them 
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all without 

documentation. 



constantly rummaging through 



This utility wMt not find every problem in 
memory or on a dlsK. It does however run very 
quickly and provides a 'warm feeling' that those 
cheap chips (or disks) are still hanging In there. 
I would be Interested In any Improvements readers 
may make In Improving the ability of this utility to 
find memory problems. I hope this utility provides 
a useful start. 



DISK TEST UTILITY 

THIS UTILITY TESTS A DISK ft MRITIW AN 
ALTERNATING PATTERN OF n AND s TO EACH 
SECTOR. THE DISK TO K TESTED HIST BE 
FORRATIEO IN THE flit FMAAI BEFORE TESTING, 
TESTING DESTROYS ALL DATA ON THE DISK, AND 
THE DISK Mill HAVE TO 9E REFORMATTED BEFORE 
USE. 



0000 02 





• SAMPLE USA6E: 


t 




♦ BiSKTEST.2 


riii t«t Drivt 2i » 




• MRITTEN IVi 


PIJIE JOHNSNOV • 




1 




707 CONTINENTAL CIRCLE, 11213 * 




t 




NT VIEW, 


CA 94040 • 




# 






• 




i LAST H0DIFIED: 3 DEC B3 t 
• t 




PA55ES 


fCB 


I 


NURBEH Of TEST PASSES TO BE 




• FLEX EQUATES 






CC03 


THEQL 


EBU 


ICC03 




CD27 


HITCH 


EM 


IC&27 




CDJC 


QUTHEI 


EfiU 


ICD3C 




CD1E 


PSTANS 


E3U 


ICDJE 




cots 


6ETCHR 


EW 


ICD15 




C024 


PCRLF 


E2U 


*C*24 




DEuO 


READ 


E00 


IDE0O 


READ A SINGLE SECTOR 


0EO3 


IRHE 


EW 


«E03 


MRITE A SINGLE SECTOR 


DE0C 


DRVSEl 


EQU 


I0EOC 


SELECT THE SPECIFIED DRIVE 



ClOC 



cmj mm m %tm 

0RS IC1C0 FtEI UTILITY SPACE 



ClOC 20 


0) 




BRA 


START 




C102 01 




V* 


FCB 


1 


VERSION NUMBER 






t CHECK COMMAND LIME FOR DRIVE NUMBER 


CI 03 BD 


CD27 


START 


JSR 


MITCH 


SET DRIVE NUMBER FROM WHO LINE 


C106 34 


02 




PSHA 




SAVE DRIVE NURIER 


cioo 30 


CD?7 




JSR 


MUCH 


INCREMENT LINE SUFFER POINTER 


CIN 35 


02 




PIR.A 




RECOVER DRIVE NUMBER 


cjod ai 


CC03 




CM.PA 


TTfEOL 


nas it missing on cmnd LINE 9 


CllO 1027 OfCE 




im 


menu 




C1H 0) 


00 




CNPA 


MOD 


HAS IT NlSSINS ON CHNO LINE' 


CI I* 'Ml )0C9 




L8E0 


HEW 




CLU 80 


10 




SUBA 


#130 


CONVERT ASCII TO BINARY 



• SELECT DRIVE NUMBER 



CMC B7 C2W 


SELECT STAA DRIVE 


CI IF 8S C262 


CDI IDRIVE 


C122 30 10 


LEA! -3,1 


C124 n DEOC 


JSR OfiVSEL 


tW 1025 OOC* 


LBCS ERROR 




• READ FORMATTED DISK 


CIS B6 00 


LW i*oo 


68" Micro Journal 



SAVE DRIVE NIWBER TO BE TESTEO 
SET REM FOR CALL TO SELECT 

IGE Ftfi 70 SELECT DRIVE 



POINT AT TRACK 



C12B C6 


03 




IDB 


M03 


POINT AT SECTOR 3 


C12F BE 


C368 




LDI 


IBIFF2 


POINT AT BUFFER 2 


C132 BD 


DEOC 




JSR 


READ 


READ THE SVSTEff INFO RECORD 


CI 55 BE 


CJ68 




LDI 


IBIFF2 




l\X A6 


88 26 




LDA 


3B.I 


BET TRkftAl 


C131 B7 


C264 




STA 


TRMAI 




C13E A6 


B8 20 




LOA 


32,1 


6ET SECRAI 


CM1 V 


C?65 




STA 


KCflAl 




CI44 A6 


B8 27 




LOA 


3^,1 


GET WWBER OF SECTORS PER TRACK 


C1I7 17 


C263 




STA 


5ECTRJJ 








♦ INITIALIZE OTHER VARIABLES 


a« u 


55 




LDA 


BlOlOlOlOt INITA1NE TEST PATTERN 


CMC B7 


C261 




STA 


TSTPAT 




CUF 7F 


C260 




Clfi 


PASCNT 


CLEAR PASS COUNTER 


CIS2 CC 


00OJ 




LOS 


1101 


START TEST AT TRACK 0, SECTOR I 


ciss n 


C266 




STO 


0»SEC 








« CREATE TEST PATTER* IN BUFFER 1 


C1SB BE 


C26B 


TEST 


101 


IBIFF1 


POINT AT 5TART OF WFfER I 


C15B 5F 






CLRB 




COUNTER * 256 


CISC u 


C261 




LDA 


TSTPAT 


SET IIP CHECKER BOARD 


C15F A7 


BO 


SOUP 


STA 


0,1* 


STORE A BYTE 


C16) 43 






COMA 




ALTERNATE 1 « AND 0\ 


CJ62 5A 






DECB 




GNJNT IT 


C163 26 


FA 




m 


SETUP 








♦ WRITE DATA TO DISK 




C165 BE 


C268 


NRTDAT 


LDI 


IBUFM 


POINT AT DATA TO BE NRITTEN 


C16B FC 


C266 




LOD 


ORSEC 


6E? TRACK AND SECTOR BEING TESTED 


C16S ID 


DE03 




JSR 


W1T£ 


USE FLE! DRIVERS TtfO MITE DATA 






♦ READ IT BACK 






Cl&E BE 


C36S 




LDI 


IBUFF2 


POINT AT SUFFER 2 


CI7J FC 


C266 




LDD 


CURSEC 


SET TRACK AND SECTOR BEIN5 TESTED 


C174 ID 


ocoo 




JSR 


READ 


USE FLEI DRIVERS TO READ DATA 






* COMPARE DATA W1TTEN OUT TO MTft READ BACK 


C177 BE 


C26B 




LDI 


IBUFFl 




C17A I0BE C36B 




LOT 


IBUFF2 




C17E SF 






CLRB 




SET COUNT » 256 


CI7F A6 


BO 


CWPAR 


LOA 


0,X* 




CIB1 Al 


AO 




CtlPA 


0,Y» 




CIB3 26 


3? 




WE 


•SXERR 




CIBS SA 






DECB 






Cltt 26 


F7 




m 


CtNVAR 




usa fc 


C266 


SONVET 


LDD 


CURSEC 


BET SECTOR JUST TESTED 


CiBI I0B3 C264 




CNPO 


TRrilAl 


AT ENJB OF DISK' 


C.9F 26 


16 




BMC 


CONTIN 


NO, KEEP 601N6 


Cl a l 73 


C261 




COR 


TSTPAT 


USE INVERTED PATTERN ON NEIT PASS 


Cl?4 U 


C260 




LM 


PASCNT 


BET PASS COUNTER 


Cl»7 4C 






INCA 






Cl9fl 17 


C260 




STA 


PASCKT 




CUB 91 


00 




CNPA 


PASSES 


DESIRED NUMBER OF PASSES CONFUTE? 


CJ<B 27 


16 




BE9 


D0NJIS8 




C1T CC 


0001 




IDB 


1101 


START A MEN PASS 


CIA2 FD 


C266 




5TB 


CURSEC 




C1A5 20 


Bl 




BRA 


TEST 




CIA7 fl 


C263 


COPT IN 


CWB 


SEC7TK 


LAST SECTOR ON A TRACK? 


CIA* 25 


02 




BLO 


NITSEC 


NQ, DO NEIT SECTOR 


ClAC 4C 






INCA 




YES* 6C TO NEIT TRACK 


ClAJ SF 






CLRB 




AND CLEAR SECTOR 


CfAE 5C 




UlTSfC 


JMCB 




NEIT SECTOR 


ClAF FB 


C266 




ST1 


CURSEC 




>CU2 16 


FFBO 




LBRA 


NRTOAT 




CIBS BE 


C1FD 


Q0RRS6 


LDI 


MCS6L 




cm BD 


C01E 




JSR 


PSTRN8 




C18I 7E 


C0O3 




Jlf 


NARH3 




CIBE BE 


C201 


DSKERR 


LDI 


MS82 


ANNOUNCE ERROR 


C1CI BD 


COIE 




JSR 


PSTRN6 




CIC4 n 


C217 




LDI 


WSB21 


PRINT TRACK NUMBER 


C1C7 BB 


caie 




JSR 


PSTRR6 




C1C4 BE 


C266 




LDI 


ICURSEC 


GET TRACK NITH BAG SECTOR 



41 



ciia 10 


cose 


ci» at 


C223 


en: 11 


CDIE 


Clfe * 


C267 


ciy» 10 


C13C 


c::e bd 


CD24 


>Cl> 16 


FF44 


C1L* 81 


C22J 


C1E5 ID 


CDIE 


C1£B ID 


COD 


CIO 80 


50 


ClEJfl 


D2 


CtEJ tf 


OS 


C1H 14 


H2% 


CIM 8€ 


C24I 


CIF7 ID 


csie 


CiFA 7E 


CI03 


Clfa 54 43 53 54 


C20> 20 43 4F 49 


CTOS SO 4C 45 54 


C2rt 43 04 


C2J 44 49 S3 41 


C20F 20 43 52 32 


C2i: IF 52 21 04 


C2P 20 ; 


lO 54 52 


ill* U 43 41 20 


C2IF 20 3D 20 04 


C22! W 20 5J 43 


C227 43 54 4f 52 


c:^ :o : 


!D 20 04 


C22f 44 52 49 54 


OB 45 20 4£ 55 


C257 40 42 45 52 


C23I 70 54 4F 20 


C23F 42 43 20 54 


C24J 45 S3 54 15 


£247 44 3F 20 W 


C24I 49 41 54 41 


C2IF K 49 44 20 


C7S3 44 52 49 54 


C257 45 20 4E 55 


C23I 4D 42 45 X 


(37 04 





mm 



;$a 


0UTKI 




LDl 


HK622 


PHUT SECTOR «K*B£* 


JSR 


PS7RN6 




101 


KURSEC*1 S€T IAD SECTOR HIKR 


JSR 


OUTHfl 




JS« 


PCfllF 




LWA 


DQ*ftT 


CQHTfuilE TEST #1711 NE1T SECTOR 


tn 


•«HJ 




j« 


PSTWB 




jsi 


GETCHR 




SUM 


HJO 


COMVEIT ASCn TO llftAAY 


ON 


12 




KT 


ER4KM 


HOSUCHMIVE 


LWA 


SELECT 




LDI 


MSM 




JSA 


PIP1 




J* 


MAM 





ERROR 



PISSI FCC TEST C0#tETE ,4 



NS62 FCC DISK ERROR* ,4 



A5621 FCC 



BSS22 FCC 



TRACK 



SECTOR 



nsu fcc mivc mmm to se tested* ,* 



nS§* FCC rMVK.19 ORIVE NUPBER 



FCC 



« VMIAHE STORAGE 



C260 


pascht 


AM 


i 


C261 


TSTPAT 


AW 


i 


C262 


WIVE 


AND 


i 


ttaj 


SCCTRK 


RAJ 


i 


C244 


TRif*m 


RFII 


i 


C245 


SECJMt 


Aff 


i 


C2aa 


CUR SEC 


AM 


2 


C248 


M5FI 


AMI 


25* 


C168 


DUFF2 


Ml 


2Si 






im 


tcioo 



TEST PATTERN FOR THIS PA55 

ORiVE TO IE TESTE! 
MURB£* Of SECTORS PER TRACK 
LAMEST TRACK ftJARCA ON OTSK 
LAST DATA SECTOR ON LAST TflAOt 
TRACK ARD SECTOR DCIti TESTED 

DATA ftAlTTlN TO DISK 
OATA KAfi FROM DISK 



EHUKSt DETECTED 



StWt TAftli: 



DUFF1 CZal 


DUFF2 C348 


Q*»A§ C17F 


COaTM CJA7 


CUASEC au 


DOVISS C1K 


wnm C180 


DRIVE C242 


DAVSEl HOC 


D3JWS C1BE 


ERROR C1F4 


6ETCM CDI3 


mm CIE2 


M561 C1FD 


R5C2 C20I 


R5f2! C217 


«ra cm 


*5W C22F 


KSS4 C24I 


HITCH CS27 


MITSEC C1AE 


OUTMEI CP3C 


PASCHT C240 


PISSES 0000 


PCRLF C02I 


PSTKRfi C91E 


READ DEM 


SEPIA 1 C243 


SECTRX C241 


SEiiCT cue 


SETUP Cl5f 


STMT C103 


TEST CIM 


fRtJWU C244 


TSTPAT C241 


TTfEOL CCOJ 


V* C102 


iAJWS COOJ 


*tr( DE03 


KATMT C145 



£• Coldatraaa Dr. 
Nunatar, Ontario 
Canada KO A 3PO 
NovtHber T4, 1983 



ttr. Don WiUlui 
65 Micro Journal 

Hliton, T« 373*3 



l>«ar Don: 



Kava Juat finiahad typing in and testing tht 'Rev Copy 
Prograa 1 In tht Roveibir liaui. Congratuletlona od providing a 
grtal utility that fllla i rtal holt in FLEX auppcrt aoftware, 

Thart la, however, ona obvious *bug' in the prograa that 
should ba corrected - ■■!• aura that all ragtatara are 
laltlallaed properly. In tht Hating, tha DP reglatar la «»u«a 
to contain a valua of '00*. Thla la not nataaaarlly tha caaa. 

I gat tha lapraaalon from tha article* and lattara in *&&* 
Klcro Journal that a>oat uaara in only vagualy awara of tha 
organliatlon and atructura of tha hindliri uaad In FLEX. 
You will notica tnat thara »r9 no reatrlctiona placad on tha 
final condition of tha DP raglatar for any routlna, not »v9n 
VARKS. Tharafora, avary progna should tntlallaa jU reftlatara 
bafora thay $r9 uaad. 



Wa. Jackaon 



fea* Mtcao joudnol 
p a »•- m« 



Intmi ttr lc^ •»• 1 4a c**o«i«r •*gtiiF« T 

Mliaa i* MKUM ta t^ M-fMtly •♦ »>cr#ct*>ui#f». 

vw »mp« that vau Mtu)« U*« l* in'ir* *•«** r««4l«r« *o*wl iwr 

• « *t»nc« Inn ctwld b« ml vulvd »niar»*l »if<ca »*n> «r 

• or cluD ^^-n«r» r««d /»t»r *«9»fir«a>. 0*»t it r«** esm ta mur 

■ MitlfQUfl trvat «*Ay •< y«or Wdiw r«Mart «rf not ■ twn *p 
lur ciwo. ftifl a '#» «f »«r mmmbm f «**• ca«t rtbul*d la ytyr 
** w «#l«« •«#< lx« r»ars 

T*« Ari«alCala«tl«oa«>i POM coA*,»t* «r •«'• th* M XM aa» Mr»» 
A&awt >*> af Irta » mi r> ara fcitnltric !«>♦» tlvl i«rt« * r >d Ci«ma»>i 
M« a>ai ara inotvitfuil «*M i. •*• mi r»*wa a» Owra in tool* 
Da>na>»ra ana NarMay< «*a ara 1 »>• anJv a« OMicKfe club 10 Saaam. 

Tn* Cl^O aajaieajra af I ha btacthala irn «avt I raj laat lrHir*oay 
^f IM ••■*««•• arr* ft a— war. j»»ra> ana JwlK. *a n««,a a Ou<n*rlr 
ciub ««aailn« cilJM fuVlirart. arilim Jh •"•on*. &*' cUi.CiW 
^hieh ta«Mr« •*/ ctMKi via 300 battfl «ada« it ^«^U» «aa4, 
wa alaa auoeart aMMn nha tiaaifn hard»*r« far « u m-Or<»rit P**r««>*a 
lha n«>t «rllKl «a ai*n (a atiPPart ta a caaowtar bum mt% VVC.tua 
•no |r« WtfVU* 

tha Mm aaari u«M by C «a M«b«)t aiffara auCh t*wt ta *o»tlf 
r"ia«2/9 babM. V«#4 «f m aJaa Hava Qfc-9 oaaad •/•!»>•. 



•Htt a yitr, that' a tbbyt UBO li.i». 



Tu*r* truly 

InoaLar biralt 
»Cra)t*r T af «J** 



Acorn # 



COMPUTER 



Da ar Don, 



SYSTEMS 88-BOC 



OetObar 28 r 1983 



Ha>ra> ara a cdupla FLC* utllitiam that ~m hava 
♦arittan for our -PftA*-TRAN3<tft> ■ systaai. Bacautt our 
avstaa haa FLCX and *1 1 Ita utilltlaa in P«Oh, wa had 
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no nood tor auto STARTUP. STARTUP Is still a poHtr^ul 
feature, so mo created "RUN.CHO" to call It. We havt 
been using It for yiirt on business programs. Just 
type "RUN" Instead of ~ I BASIC PTOGRAR-. Vou don't 

even have to rwmmmtour the nane or spelling of the 
proorae. 

R.CMO Is a lity nan's 'repeat coaaand line" *lth a 
proeot. It works great for printing a catalog of your 
disks. Just typ» ♦+♦**, P, CAT. When the first disk Is 
coaaplotod, change disks and answer the prompt "REPEAT 
<Y-Nl?" with a 'V as many tiawt as nssdaxJ. urien 
done, answer 'N* and return to FLEX. 

These programs follow too E» Taylor's concept of 
writing FL£I utilities that can be asseeoled for 6800 
or 680? CPUs. Usually this only requires changing one 
PLfx equate. In this way, w» do not split FL.EX users 
Into two factions. 



r.chd 



REPEAT COWHAND LINE 



1 

■ Uiti opp«r h«l< o* input buHir. « 
I Ltavtt rooo <or o« byta C«D atnng. ■ 

■ rrovptB -REPEAT *Y-N|->- ■ 

• I 

■ ***R,P,CAT C^anga dttfr and rtptat f 

• ♦♦♦R.NEVDJSK ItCOPY 0.1 .CTIO .SYS -LQW • 

i i 

■ ACORN COFOt/TER SySTETQ - A.C-S. Inc. 1 
1 8v Nfrli 0i»««*ldt Oct. 24. 1983 ■ 

i FLEX - Tradaaimric oa T,S-C. toe, 

■ FLCl EQUATES 



CO0O FLEX 



Eou 



BCOOO 



<«AOOO «or &800 FLEX> 



CD03 U4RNST EOU FlEt<»*003 

C04B DOCrmD EOU FlEi»*D4B 

CCl4 BUFPNT EOU FLEI»4CJ4 

CDlE PSTAN© EOU Fl_E**a01E 

CDI3 OCTCXR EOU FL£X*«01S 



Yours truly 




ORG 



C0C2 TO 
C0C4 01 



REPEAT BRA 
FEB 



FLEX*«C2 



REFT 

I 



Vfrilon nu«tp»r 



run. cud 



♦♦♦«UN 
♦♦♦RUN 



ElEC. STABTUP-TIT FILE 



STARTUP. T*T on dktk 1 
Oa'alt to diah 



ACORN COMPUTER SYSTEMS A 
By nwii Olaa'oldt Oct 



C.S. 
24. 



Inc* 

1983 



FLEX EQUATES 



BOOO FL£l 



EOU 



♦COOO 



<SAOOO 4or 6800 FLC*> 



C027 HI TOW EOU Fl^i*«Q27 

CDlE PSTAN8 EOU FLES'aDlE 

COOO BUFFER EOU Ft-Ex *%BO 

CCt4 0UF»NT COU FLE*-4C14 

COO* RENTER EOU FLEX-400A 



Fl.ES*«lO0 



WC3 COOO 

C0C7 BC 
COCA BF 
COCO BO 
COOO 26 
C002 BE 
COOS BF 
COOO BE 
COOB BD 
CODE BD 
COCI 84 
C0E3 B1 
COE3 27 
C0E7 Bl 
COE9 24 
COEB 20 

COCO 7E 



« TEMPORARY DATA 

BtEnP fob oooo 

CC14 RfPT LOX BUFPNt Gat bu<<lr pointer 

C0C3 STl BTEhP Savo po)nk«r 

CD4B REP2 JSR DOC«M> Do c ooma nd 

IB ONE REP4 I* ERROR *v(t 

C0C3 U>X BTCNP Raaat bu««pr pointer 

CC J 4 ST X BUFPNT 

COFO REPS LOX 4RDYST -REPEAT ?- 

CDlE JSR PSTRNO 

CD13 JSR QETO** Q«t Y or H 

V ANDA aaSF Oanga to u»Pir caaa 

4€ CNPA **N CNOI 

Oa BEO RCF4 Tn*n **lt 

39 CMPA ■'¥ <Y€3l 

CO ONE REP3 Not *Y*. *a* again 

€0 BRA R£P2 Do c owM nd aoatn 



C100 


2© 


OS 


RUN 


BRA 


RUN1 


C102 


01 






FCB 


1 








* TEMPORARY 


DATA 


C103 






BTENP 


RUB 


2 


ClOS 






BTENF 


RHB 


2 


C107 


BD 


CD27 


RUN J 


JSR 


NIT C*« 


C10A 


23 


O* 




BCS 


RUN2 


C10C 


84 


OF 




&n:a 


••or 


C10E 


Bl 


OS 




CNPA 


• OS 


CHO 


23 


01 




BLO 


RUNS 


CI 12 


4F 




RUN2 


CLRA 




C1J3 


8A 


30 


RUNS 


ORA 


1*30 


CU3 


B7 


C14F 




STAA 


DAVMLTI 


Cub 


BE 


Ct4» 




LOX 


4STARST 


CUB 


to 


CDlE 




JSR 


PSTRNO 


CUE 


BC 


COBO 




LOx 


•BUFFER 


CI2I 


BF 


CC14 




ST I 


BUFpwT 


Cl?4 


BF 


ClOS 




ST* 


BTEnP 


CI 27 


Co 


14 




LDAB 


420 


Cl2* 


BC 


C14* 




LOX 


ABUFFST 


CI2C 


A* 


B4 


RLDQP 


LOAA 


0.x 


C12C 


30 


01 




INI 




C130 


BF 


ClOS 




BTK 


STENP 


cis:; 


BC 


ClOS 




LDI 


BTE*^ 


CI3* 


A7 


B4 




BTAA 


O.I 


CI38 


30 


01 




1NX 




CI3A 


BF 


ClOS 




ST It 


BTEHP 



VfTHon nb«bir 



COFO OA 00 



COF2 32 43 SO 43 
COFF 04 



ERROR « SI DETECTED 



REP4 


JNP 


MAAttST 


00 to 


RDvST 


FCB 


4A.SD 






FCC 
FCB 


/REPEAT 

m 


<Y-»NtT/ 




ENO 


REPEAT 





&»t ntxt character 
Branch 1 4 no char. 
Rwntof ASCII 
Ca*oar« to oait. drlvo 
Branch 1 4 OX 
toad drivt "O" 
C^«n4« to ASCII 
Sava <Jrtv» nuabtr 
"ElEC, 0. STARTUP, TXT* 



'40' Micro Journal 
Altni Don U» I 1 t a»t 
3>## Ctitandri Or i v 
P.O. Boa 04? 
HI ion, Tn 17J41 



Load buH*f tdtfran 
Sava in ^w« 4 a-r pointer 

Load Strino count 
Load ttrtng addraaa 
Bat Char, irom airing 



C13D BE ClOS 
C140 3A 

C14| T4 E9 

C143 7C COOB 



STENP 



JMP RtMTER 



Dtcr ia t n t COvmt 
Oo do coM»|nd 



C146 00 OA OA BTARST FCB 

CI 49 43 38 43 43 BUFFST rCC 

C14F SO 0RV»*#» FCB 

CI 30 2E S3 94 41 FCC 

CISC OD OA. 04 FCB 



END 



40, IA, «A 

/EXEC, / 

•SO ASC 1 1 

/.StAftTUP. TXT/ 

•0.4A.4 

RUN 



Daar ne . Wl 1 1 ihi 

1 t«av« baan a lubicrtbtr to xo\ir ««qii a* 4or r#* 
laao r*4r%, and I anior it vry a^ch, Ho^fvin I a** auch 
prrnt Oavotad l« %o4 twara lanouiffti and ca^artnent than 
1n«or»at»on «or hoOO»«ata. Th * a i» a ehinoa 4roia tht aarl 
ittv«t o« rd«ir •*0BT< r >4- Thi rcaaon I mtO(i ii to (naRa 
luiiliblt to rour nidt't icfi proQrami and patchia I Kawa 
dawalopad war tha paat rttr. Tha 4irat j* a Patch to 
DttttrilTEt* Ccaapwtar SVataaa Cantar tahich ov»re<mi a **ry 
«r»<atrat*ftQ ahortcojamg o4 an aacallant prooraov. tha inab 
to Inpwt lowarcaa* coi^anda or aoor ••••». Tha patch 4a ca 
OYNP.TXT. Tha aacond »a a PigiMttng print driwar mi th pr 
control atringa 4nvoAad by argvv**nta on tha ccaamand Una, 
prograja la called p.txt. 14 anyo^a i »i ntanatad in a copy i 
thaa* **}•• on a 4 loppy, I Milt ba happy to copy thaat onto 
a S 1/4 or i Inch atngla daftalty foraiattad Uoppy. 14 in> 
mow Id Mka to aachanga prOOTawa I Mill p^y raturn poataga, 
otharMiaa plaaaa proved* ritvrn poataga. Plaaaa continue 
prOtfkd* mS*4u1 maoriaation to th, +BXX uun. 

Your* truly. 



to 



11 ty 
ttad 
i ntar 
thla 



ERROR ESI OfTECTCD 



Ron Roattar 
RFD Baanan Rd. 
Pr i nc a ton Ha 
■ 1341 
<*17>4*4-3S*l 
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• dynp 

» patch to dynamite to Allow loutrctsf 

• in tht eonwnand 1 i n» 

• ffrmt rtlocitt by tl88 

• rvlocat* dynamite dynx 100 

•■ th»n appvnd th i m patch to dynx 

• append dynx.Od dynp. Bin dyn.Cmd 



htxl 



nxtch 


• qu 


•cd27 


mxmfcb 


• qu 


•c840 


x* •rfg 


• qu 


•ccid 


xftrtd 


• qu 


•ccl» 


•rr typ 


• qu 


•cc20 


fmt 


• qu 


• 440 6 




org 


•0ib8 




jmr 


unx tch 




org 


• 9289 




jmr 


unx tch 




org 


• 0409 




jmr 


unx tch 




org 


• 0422 




jmr 


unx tch 




org 


• 04*0 




jmr 


unx tch 




org 


•03bd 




jmr 


unx tch 




org 


•03** 




jmr 


unx tch 




org 


• 07*d 




jmr 


unx tch 




org 


«88H 




jmr 


unx tch 




org 


•0836 




j»r 


unx tch 




org 


•03c I 




jmr 


ugh»x 




org 


mo4f l 




jmr 


ugh«x 




org 


• 0536 




jmr 


ughtx 




org 


•0839 




jmr 


ugh»x 




org 


0008 


unx tch 


Jmr 


nx tch 




pmh 


cc 




bmr 


upper 




pu 1 


cc 




rtm 




upptr 


cmpa 


•'a 




bl t 


r tn 




and* 


*»3f 


r tn 


rtm 




flgl 


fcb 





*lg2 


fcb 





ugh** 


c>ra 
clrb 






mtd 


4) gl 


1 oop 


jmr 


nx tch 




bcm 


carry 




bmr 


h»xl 




bcm 


h»x2 




pmhm 


b 




Idb 


M4 


loopl 


ami 


4 lg2 




rol 


f tgl 




d*cb 






bo* 


loopl 




pul m 


b 




adda 


flg2 




mta 


f 1g2 




Incb 






bra 


1 oop 




jmr 


nx tch 




bcc 


h*x2 




rtm 




carry 


Idx 


f Igl 




andcc 


***• 




rt* 





bmr 


upper 


muba 


tt*4? 


bpl 


h*x3 


adda 


*6 


bpl 


h*x4 


adda 


*? 


bpl 


h*¥3 


add* 


••0 a 


bmi 


h«x3 


andcc 


***• 


rtm 




orcc 


Ml 


rtm 





ht«4 



h»*3 



*P 

♦PARALLEL PRINTER DRIVER 

♦PRINTS 36 LINES PER PAGE THEN FORMFEED 

•SUPPLIES CONTROL STRINGS FOR C-1T0H 8518 PRINTER 

♦CALLED P *AE LIST FILE 

•A TEN PITCH 

♦6 TWELVE PITCH 

♦C PROPORTIOr^L 

•D SIXTEEN PITCH 

»E BOLD (DOUBLE STRIKE) 

•F DOUBLE WIDTH 

»G SET LEFT rttRGIN IN 8 CHARACTERS FOR LETTERS 

• OR THREE HOLE PUNCH 

•H NO AlfTO FF 

•LAST REVISED 24-FEB-83 

•RON ROETZER 



DR 


EQU 





DDR 


EGU 





CR 


EQU 


1 


BUFPNT 


EGU 


• CC14 


NXTCH 


EQU 


• CD27 




ORG 


•C300 




FDB 


ENDS-POPEN 0R1VER LEGNTH 


• ENTRY 


VECTORS 




POPEN 


LBRA 


OPEN 


PQUIT 


LBRA 


CLOSE 


PCHAR 


LBRA 


PUTX 


PCHEK 


LBRA 


CHECK 


PIA 


FDB 


• E01C 


SIDE 


FCB 







FCB 





PFLAG 


FCB 


• FF 


TEWP5 


FDB 


0000 


LINCNT 


FCB 





FFLAG 


FCB 






•CODES FOR TEN PITCH 

TEN LOA *27 

LBSR PUT 

LOA *'N 

LBSR PUT 

LBRA OPTLOP 

•CODES FOR TWELVE PITCH 

TWELVE LOA M27 

LBSR PuT 

LOA i'E 

LBSR pur 

LBRA OPTLOP 

•CODES FOR PROPORTIONAL PITCH 

PROP LDA *27 

LBSR PUT 

LDA i'P 

LBSR PUT 

LBRA OPTLOP 

•COOES FOR SIXTEEN PITCH 

SIXTEN LOA *2? 

LBSR PUT 

LDA *'G 

LBSR PUT 

LBRA OPTLOP 
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•CODES FOR DOUBLE STRIKE 
BOLD 



LDA 


*27 


LBSR 


PUT 


LDA 


W* 


LBSR 


PUT 


LBRA 


OPTLOP 



•CODES FOR DOUBLE UIDTH 
U1DE LDA *14 

LBSR PUT 

LBRA OPTLOP 

•CODES FOR INDENT LEFT httRGlN 6 CtttRACTERS 



DRAFT LDA 


*27 




LBSR 


PUT 




LDA 


WL 




LBSR 


PUT 




LDA 


we 




LBSR 


pur 




LDA 


we 




LBSR 


pur 




LDA 


tt'8 




LBSR 


pur 




LBRA 


OPTLOP 




iNO AUTO FF 






NOFF INC 


FFLAG.PCR 


LBRA 


OPTLOP 




OPEN LDX 


PIA.PCR 




LDA 


**3A 




STA 


CR,X 




LDA 


frftFF 




STA 


DDR,X 




LDA 


tt*3£ 




STA 


CR,X 




LDA 


*%flQ 


CARRIAGE RETURN 


LBSR 


PUT 




LDA 


**ec 


FORM FEED 


LBSR 


PUT 




LDA 


H27 


RESET LEFT rWRGIN 


LBSR 


PUT 




LDA 


WL 




LBSR 


PUT 




LDA 


we 




LBSR 


pur 




LDA 


we 




LBSR 


pur 




LOA 


we 




LBSR 


pur 




LDA 


K27 


SET TEN PITCH 


LBSR 


pur 




LDA 


WN 




LBSR 


PUT 




LDA 


*27 


CLEAR DOUBLE STR1 


LBSR 


PUT 




LDA 


M34 




LBSR 


PUT 




LDA 


♦415 


CLEAR DOUBLE UIDT 


LBSR 


PUT 





•PARSE THE INPUT LINE FOR ♦ 

<**ID CHECK FOR A THRU H 

SAOBUF LDX BUFPNT 

STX TEMPS, PCR POSITION 

SOW JSR NXTCH SCAN L[NE FOR LETTERS 

CMPA *'♦ 

BEO SAVBUF IGNORE PLUS 

01PA #*69 CHECK FOR LOWER CASE 

BLE CTEST 

**IDA HS5F AND COWERT TO UPPER CASE 

CTEST CMPA WA 

BLO SCAN2 

CMPA WH 

BLS SCJ*J 

SCAN2 LDX TEMPS, PCR 

STX BUFPNT RESET POINTER 

CMPA **29 SPACE FOLLOWS OPTIONS 

BNE TRY! 





BRA 


OPTLOP 






TRY1 


CMPA 
BNE 


W 

NOOPT 






OPTLOP 


JSR 


NXTCH 




GET OPTION OWR 




BCS 


ENDOPT 




NON-ALPH**IUMERIC 




CMPA 


H**e 




SET UP PRINTER 




BLE 


A 








AN DA 


frftSF 






A 


CMPA 

BNE 

LBRA 


WA 

B 
TEN 






B 


CMPA 

BNE 

LBRA 


WB 
C 

TWELVE 






C 


CMPA 

BNE 

LBRA 


wc 


SIXTEN 









CMPA 

BNE 

LBRA 


WO 

E 

PROP 






E 


CMPA 

BNE 

LBRA 


WE 

F 
BOLD 






F 


CMPA 

BNE 

LBRA 


WF 
G 

WIDE 






G 


CMPA 

GNE 

LBRA 


WG 

H 

DRAFT 






H 


CMPA 
BNE 
LBRA 
BRA 


WH 

ENDOPT 
NOFF 
OPTLOP 






ENDOPT 


LDX 
LC*tt 


BUFPNT 

e,x 








CMPA 


*S2B 




SPACE? 




BEO 


SKPSEP 








CMPA 


"', 




CCMiA? 




BNE 


NOOPT 






SKPSEP 


JSR 


NXTCH 




PASS OVER SEPARATOR 


NO OPT 


CLR 


LINCNT, 


PCR 




RTS 








CLOSE 


LDA 


**8D 






PUIX 


TST 


FFLAG,PCR 






BNE 


PUT 








CMPA 


**8D 




COUNT NUMBER OF LINES 




BNE 


PUTY 




ADD FORMFEED ON THE 54TH 




INC 


LINCNT, 


PCR 




BSR 


PUT 








LDA 


LINCNT, 


,PCR 




CMPA 


*S6 








BNE 


PUrRTN 








CLR 


LINCNT, 


PCR 




LDA 


**ec 




IF FORMFEED CLEAR LINCNT 




BRA 


PUT 






PUTRTN 


RTS 








purv 


CMPA 


usee if 


NO CR OF FF PRINT NORWLLY 




BNE 


PUT 








CLR 


LINCNT, 


PCR 


PUT 


LBSR 

BPL 

PSHS 


CHECK 

PUT 

X 








CLR 


PFLAG,PCR 






LOX 


PIA.PCR 








STA 


DR,X 








LDA 


**34 








STA 


CR,X 






2C 


LDA 


**3E 






3b 


STA 


CR,X 








PULS 


X,PC 






CHECK 


PSHS 


X 








TST 


PFLAG,PCR 






BMI 


CHEX1T 








LDX 


P1A.PCR 
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TST 

epL 

TST 

COM 

CHEXIT PULS 

ENDS EQU 

END 



M P«1*T C»4>l Itln^ltHl ( P*I%T 

34 01" «V4U44. 

3: 01" L4P -M.»» 



CR,X 

CHEXIT 

0R,X 

PFLAG,PCR 

X,PC 



'(MIINi CAKVI TO «*C Lift*. (AS****. 
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l?« SOTO I** 
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1*4 :p t #>** *-*> j4w 

it* i*ar* *■* -**• 

IH 3M« Mitttt" 44) 4 



r««M it* 

•4 ThO* 13 
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;4* i# vcm'*«i 

isc im «* t«» coaua t*»4 
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IMi IP LM i* 
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l»3* Ll-I 
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ft444 


<«-.. 




3414 


OFCi* OkO IC« 4- 1 




:#?• 


F04 CI t0 144 




:-**4 


Jt#»j i,tm *k.i>L«iii 




zn* 


MCtT I 




■tat 


f-J 1 




Jj;4 CLDH 1 




31 14 «WT4 )4# 
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*M» T H*I 




1444 
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*«M 
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Wk 
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«» 


'ff*4 J Ci-# J Ct^ 




Wl 
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*4#: 


totol*! 




44M4 


IP *P-4 T*4JH .- 1 , \ 


tvi** 


444* 
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♦4*4 
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If -*• '"€". 41** 




«**# 


SL*4 1 P**# 1 NT*) 




«4»? 


P* 1*1 TO 10MI44I 




«4»i 
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Mm 


IP t«4«"»* 0* *•••'-* 


T*««i OU*l 0V 


•4*4 


l» BV»| *•«» |4#« 




nn 
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4144 
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KM 
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4124 1- ;*•** 1 ,44. "DrtHM' ■ 




mm 
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UPPERALOU/ER CASE CONV- 

t>*or Done 

tncloood pl«oo« find Hating* and dlok for 4 progron that 1 
wrota to do upper and louar coo* convaraiona. I find th«t Z 
on doing »11 of My programming In nlxad caaa and thla illowi 
mm to quickly eonvart old routlnaa to lowar caaa th4t wara 
orglnally writton in uppar caaa. 

It la writ tan In TSC pracoapllad. axatandad BASIC ualng aoea 
of my favor Ita tachnlqgaa. I prafir tha gaa of tha 
pracoapllar as It sakaa tha coda such aort raadabla with tha 
uh or aitandad labala and variat>l4 nariaa. 

Raadara can racalva eonplata aovrcaa by aandlng a tLZX9 
foroiattad V diak. to tha aoov« addraaa with thraa dollara 
for handaling. (Sorry, I don't n4va 3" drivaa.) 

•OX 472 SOMMIT *OAD 
*0*TMK\WT MMaOa. MAIM- 04662 
TWL, <aO?» 27tV93SO 



dwrght m. Unphcr 
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4o yow »••*> to eMtirt ca MP9«rc444 or lov4re««4 (0 or t>7 U 
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wiMt ti tha loot 1140 to b» eo*wort*4i7 at) 
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pl444* *»*it — • pro«404L«*g InforaotloA 
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44 
*» 
5* 



n 
n 






author r 0.-. C*-j» h /ji 
veralooivl . JtO DftttMct 24. l«tJ a 

ole pcograe ulll allow the weer to convert an MCtl te»t file 
fro* uppar la louer eat* or (r«a lever ea upper t^ um[ la 
eleo allowed to control tha lira canle and tha coluaai r*age. 
for laeience« (hi ficai nluan 1* llree 10 through 35 could ba 
converted ta upper ceea. 

■at* that the Input flla la rer.aead " L P rtJl . ?W* " and the output 
file la naond eh* anna «a (M original Input file* Thie aafcee 
flla con vera lone mt convenient if you ft© longer wvit the 
original flla* Tna oparetor la given a ctMlKi to da lata tha 
urrut.rnr file if he mihii to do eeveral eonvar ilent. 
At tha and of tna run a abort iuaaicy of tha COftverelona will 
ba dlapleyed. 



II 
12 
II 
14 
1* 
la 
17 
la 
1* 

to 

21 

21 

24 MTTL icrltl) P.*. CaJfla* 



• aain rfvtlni 
* 

• ant la dona through tha error nenOlln? rout in* aa an and 

• »t flJ* arror 



U nam print 

14 print *irn»/ , L0NIX caaa convaralon routine* 

15 print -<cll«|j «.*_ tanphar' 
34 print 'Miiton Vvarelonl 

17 print 

14) on arror goto fl a it 

14 goeub gatflJe iraai get fllanaaaa 

40 goaub eonpre iraa oat convaralon paraeture 

41 goaub llflpru iraa gat tlna pereaa>ter» 
4] goaub colpra iraa gat coluan paraaatera 
4 1 print 

44 print "plaaaa wait — - proceeelng Inforaatloa" 

4t pi lnt 

4* 

4T linaloop input line II, infialdl 

44) llnacowntl»llnacountt*l 

4t If Unecountl'f Itetllnal than outflaldl*lnf laid* \ 

igoto out Una 

SO if llnacountl.laatUnal than ou tf iald|*lnfleldl \ 

igoto outline 

11 goaub convert Jr *« «*» ennvaraion 

11 oatllna print 42. outfield* 
goto lio«loop 



fin loh print 

print •Toial of*: Urecountlt Minn proeaaaad" 

print * *tconvertcauntr*cherectare converted" 

print * •rnoconvertcount « "eherectare not converted" 

print 

print 

goaub lowiignt 

print "do you tiloJi to dalala LPPAJI .T-P"t 

g aub highlight 

input re appeal 

raaponael «le(tl< raaponaal . 1 J 

if raaponael* -W or reepOr eel- "n" than goto fihiah? 

if raeponeef •»"!" and reapOn aaf> *» -y* than goto ftoiah 

goaub louiight 

ptinl "ara you eure*t 

goaub highl ight 

input raaponaal 

rii(«m*(*lt( 1 1 l raaponaal. I J 

if reaponaa(- "N" or reeponee|-"n" than goto flniahl 

if reeponee|«i "T" and r eeponeeS <» "y" than goto finiah 

kill "U*»li..»n*>* 

print *UI»P4JUT*P deleted) • 

rim**; clca- 1.2 
flniah) print 

• •ic'Juap. cdOO- titt return to tlv* 

* notat tha laat Una could oa replaced with *#nd* to return to X144IC 



i;a 
at 
uo 
Ml 
111 
IH 
LM 
Ml 
<;* 

in 

iJ.9 



4 H 

lil 

I *4 

; M 
LM 
i j* 
I »• 

I ii 

J4H 
.41 

m; 
t < » 

144 

144 
i4t. 

141 

144 
14t 
J» 

Ml 

1^ 

1M 
S4 

3S% 

1M 

IH 
14* 

110 
141 

I6J 
141 

144 
14» 

i« 
i*> 

14* 

170 

m 

17J 
171 

174 
171 

I M 

174 

171 

140 
111 



* gat convaralon pa ran* tar fro* teralnel 

* the following ergueanta era returned* 



*2 
4J 



• 7 
44 



100 
101 



lOJ 
101 

KM 
101 

IS 



in 

112 

in 

114 

115 

144 

lit 



arror handl Ing 

thia eleo doee en orderly exit for aequantlel fllee 

iikl if arr-4 tnen raauaia flntah 

if arr-4 then print ipetnt "file not found«\ 
aprlnt \ 
racae- Tllae- \ 

tprtht \ 

irtiuv gatfile 
It art*l thaa print \ 

iprlnt "taaporary (11* itp»5P.Tn»> already *4iata*\ 

iprlnt "plaaea delate o* renaem U99Z».T*9*\ 

iraauaa flhlahi 
print "error nuabai *r irrt * at Una nuabar*:erl 



f*K flla naaaa 

tna tallowing er9M**niai are raturnadi 

infllancaal file data la ta ba r**d froa 

• aatfllaaaaal file eat* it to b. «w it tarn ta> 

patC 1 1« aa>a«a> lowllght 

print * f«ll a*m of file to ba converted Cat. rlt4.t«T)*t 

f «nab hlgnlkght 

iapajt laflluneeait 

raneaM Inrilanaawl , *upi>|a.TaP- 

prlae •tha orlgnal nao b*a* hMh! WHl.THl' 

out f 1 Lan««al>lnf i lanaa*! 
Infllaneaal* ■UPPtJI . T-P" 

opan old lAfllenaeel ee 1 
open nau ou tf i lanaawl ee 2 
retw.rn 



Ml 

in 
It* 

1*1 

Lf| 
itt 
144 
IH 

i#a 

14* 
14* 

300 
• 201 
202 
10 1 
M4 
Ml 

104 

201 
204 

20* 

3! ■ 

ni 
in 

21J 
U4 
21* 
214 

21T 
21* 
11* 
iiQ 
111 
lit 
21* 
114 
Hi 
1» 
227 
3f 

in 

1*0 

»i 

JU 
2»1 
IH 
114 
11* 
^ 
11* 
11* 
140 
241 
141 



for lower ta upper c«a# convaraion 
for uppar to lovar cji* convaralon 



goau louilgnt 

prim •de> yo u »iah to convert Co oppocceee or lowenreaa l» « li'r 

goaub nighllght 

input corivareionl 

eonvar a Ion I • let tf ( eonvar alonl. 1> 

if caaivarolonl - "L" than ronvara lon!*-l " 

it oantaralonl - "0" taan eonvar alont--o" 

ir conieraioal *> *u" and converaioal «> "1" than gota- conpra 

return 



* gal coluan p*re**tere froa taraknel 

* tha folloulng erguaenta ara retumadr 



■ Mretcole 

* leatcoll 



the firet coluen to b* converted 
the leal coluan Co b* conwartad 
tola aalue le a* t to 4*4* to convert Chtooftb the end of field 



v*ujt ta tha firet coluan to b* conwartad* 



colpra goaub louiignt 
print » 

goaub highlight 
input Uratcolt 
II fireteell4l then goto colpre 

colpral goaub louiight 

print " do you vant tha convereion through tha end of tn» line"* 

goauh highlight 

input raiponaal 

raaponaal*laft|4 raaponael, I ) 

If raaponaal- "t" or reeponeel*"y" man laetcol!*4194t goto colprad 

if raaponael ♦• •»* and reeponeel « » "n* then loto colpre2 

colpraJ goaub louiight 

print " what la tha leet coij-on to ba Mllirt|i*l 

goau ntghllght 

Input laatcoll 
COlpt-ad return 



* gat line pareaatara fro* teratnel 

" tha following arguaanta ere returnedi 

• 

■ flratllhet tha firat line to be Converted 

* laatllnel ik* laat line CO be converted 

* thia value la aat CO 1*441 Co convert through tha and of file 

linpm goaoft lowllgat 
print - 

goaub highlight 
Input firptllnal 
If flratllpelil than goto llnpra 

llnpr*! goaub louiight 

print " do you want the OOnvereion through tna and of t#u> file"» 

goaub highlight 

input raaponaal 

rvapen aal-: a ftl( raaponaal. U 

ir reaPonee|--y- or eaaPon*a(- «y* then loot 1 Inal-ggll* goto llnpred 

If raaponaal « > -M' and revpon val«> «n" than goto UnpreU 



what la tha firot iin* to ba co>*actod* 



UnpreU goaub louiight 
print * 

gtaub hlghlagnt 
input laatllnal 

Unproa return 



uh*t 1« tha laat iio« ip ba conwartad*- 



* thia la tha **ln convereion loop 

* follovlng a guaante euat ba paaeadi 

* Infialdl the etrlng to ba conwartad 

* flratcoli the flrat coluam to ha converted 

* laetcolt the laat aoluan to ba convartad 

aat tMe value to 44** to convert through the end of fiald 

* conwaraioal - u « for lower to uppac caaa convaralon 

•1* for uppar to lower caaa aonvereloo 

" oulfleldl le returned ulth tha convaraiona 

a 

convert fieldlenglht - lent Infialdl ) 
outf leldf* 

llnolOOpl for polniartjvl to fleldlangtM 

la t tar |«*ld| ( Infialdl. point art. 1) 

letterl*eac( lattarl? 

If polntargif Iratcoll or potn terl^loatcoll than goto otharchar 

If convaralon|-"o a goto uppareaaa 

If eonvar a lon|-"l" gate lo»arcaea 

print "convaralon caea apaclftad lacorractly" 

return 

louarcaaa if lattarl*!! or letter!. 10 than go ,o otharchar 

outriald|*outtialdl-chr|| letter 4*221 

eonvertcount«convortcount*l 
goto con vert and 

uppareaaa ( f letterlc47 or latt«rlH22 than goto otharchar 

Outf laldl*outfiald|*chrlC latlarl-22} 
coevar tcount* eonvar teoun t*l 
goto convortend 



otharchar 



out floldl -out rialdl- lattarl 

noconvartcount-ooconvar tcount^) 



convettand h*4t polnterl 
return 



'68' Micro Journal 



47 



.4 • 

Ml 

Ml 
J10 
131 

i\l 

ftf] 

JM 
231 
234 
>37 



* Th« followlno. 4vbroutir»»a Cau*. 41 3WT+C 42 la CUT to 6laPlar lov 

* iritan.ity An4 lilf* mtanftlty Charaetara* Tl\ay ara Aet naeaatory 
" for tn.« operation OX th* pr°qrao Ana" could bn aloply raplac.o' by 

* ratvrna or th4 apprPpriata Control *«>q»a»eaa for iADth«r ttrtlntl. 



aaanpl* f 



lo*lla*t 
h»9*U4*it 



lowllaht print ch.rl< 101 : cHr* < 12 ) : 
r a turn 



MfHli^t print *rir*< JO) r cnrt (4 >! 
return 
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Itwar tun ■ 

The fulluwirie kroflr<*ti h*t been v^rv useful to »e« 
•jiwbe vo»e of your reaOer ti Mill loo. The *ro*r&4j cj»o 
in to beine out of the nved to chick that 4>s drivef 
uere U.l, fcy-eed mi*©, r h*ti • ►roH*-a *jk*r •> 4 nl« 

msd* on or ( «i dnvo could not b« f4ad on another drive 
and vi»a vorio. Thi« ^roiria holt-«d •« find that on* 
of «jw drivth u«« running to f«%tr 4nd a ouic* 
ad^u4t4)«4it corr*tct*>d thy #-robl»». Nolo thai thi% 
»rosra» uv«l Uftini loo*-* «4fl fvt 1 Mhs. uw*> lit 2 rlhz 

14 O.n. «*4 luntt 44 ¥OU 4TV XlOt UtlHl %l0U 1/0. If VOU 

ar« U4in0 4low I/O thv ttftini loo^& Mill have to be 
re calibrated due to inttrhjcti&rit in th» 1/0 area. 
Thi* »-i ohm will onlw uurK for 5" drives and en* 
controller U4l»tf 4 17XX or « ?7XX c«>rit roller chi^i vou 
4»u4t however chenme the chip roaifcter vouatet. 
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HELP 



WANTED INFORMATION ON SWTPC MP-QP QUMZ DAISY WHEEL 
PRINTER INTERFACE. ANY HELP LOCATING A [4>-QP BOARD OR 
CONSTRUCTION DETAILS FOR A SIMILAR BOARD WOULD BE 
APPRECIATED ALL EXPENSES WILL RE REPAID. 
Roy Evons P Box 36 lluko N.S.W. 2460 Australia. 



CLASSIFIED ADVERTISING 



A/C BOO 338-6B00 

44)4 

LIKE NEW - ADDS-VIEWPOINT CAT TERMINALS - OCMO UNITS, 
THESE ARE LIKE NEW - WARRANTY NEVER REGISTERED - SAVE - 
ONLY $478.00 EACH - ONLY 1 LEFT. CAJ.L ASK FOR DON, TOM 
or LARRY 

A/C BOO 338-6800 

44)4 

GIMIX II CPU*. 2 Mhz.wltti F1£X SAd OS^9 - iMl | # Ver- 
1.2. latest as of 9/1/85. This CPU board Is like new, ire 
went to GIMIX III systum. Set up and ready to run. With 
FLEX and OS- 9. Have both on your system and just call 
FLEX or OS-9. Includes software and documentation. 
Also Time of day clock. FLEX DAT, OS-9 FPLA. Set up to 
require GIMIX §6B DMA disk controller. Original cost over 
S900-00. Special only 729.95 plus sMppTnng (3. 50). Ask 
for Don, Tom or Bob - 1 615 842-4601. This will not last 
fcvtojl 

444) 

TELETYPE Modal 43 PRINTER - with serial <RS232> 
I nterf ac e, and full ASCII keyboard. LUCE NEW- New cost 
$1295.00 - ONLY $759-00 reacly to run - Call Tom - Larry - 
Bob, CPI 615 842-4600 
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CMS 9670-120D 20Mb + 1Mb Floppy, 2Mhz system. 64k 

static, 0S9 levf vor.1.2 16 slot cord-cage, switching p.s 

Posca', Baslc09, C, Assembler, Debugger, Stylograph oi 

much more- Flex + 200+ programs available 

$1 1.000. All for 16,500 0-8.0- 

Friedman 604-9&6-2607 after 1800 Pacific time. 



an 
Value over 



2-DSDD 8" RENEX RFD 4000A Drives In Cabinet with P/S and 

manual $550.00. 

Joseph A Goze 312-799-6492 after 5:30 

Complete 56K 6809 System with Glmix mainframe, DMAF-t 
dual 8" disk system and Perkin-Elmer 1100 terminal. Two 
serial, one parallel port, W'-R EPROM Programmer and much 
more. FLEX-09 and loads of software. A good buy at 
$1,500. 

John Ta vln 408-946-5700 ext. 216. 

«♦# 

SS-50 2 MHz 6809 SYSTEM, H-19 CRT, GIMIX G28 CONTROLLER, 
PER COM DRIVE, 2 THOMAS 4BK BOAflDS, TANNER 64K CARD, f*>- 
LA, SERIAL CARD, CLOCK, F & D FHC-1 VIDEO, 280 CARD, GOLD 
CONNECTORS, FLFX/OSO SWITCH ABLE, SOFTWARE & MANUALS. 
$?295/BEST OFFER. ALSO SWTPC BK CARD $30, SE MICRO 
DDC-16 CONTROLLER $100^ 0MC 12" MONITOR $75. 
JTm Harmon, 1509 N 10, Durant OK 405-924-4471. 

SWTPC 6809 Systsnv M19 CRT. 2 W>l B52 DSDD drives, Glmlx 

G28 controller, Mt*S2, MPL2, MPT. 56K RAM, Software, 

Manuals. $1595. 

Tom J Harmon, 15418 Diana Ln., Houston, TX 77062 713- 

480-6075. 

FOR SALE11 

3 DM-64 HAZELW00O MEMORY 
CARDS WORK GREAT, $275.00 Ea- 
(1981 not used for 2 years) 
Contact Dave: 208-939-6426 



COPf ILER EVALUATION SERVICES 
By: Ron Anderson 

The S.E. JCD1A Division of Computer 

Publishing inc.. 

Is offering the following SUBSCRIBER 

SERVICE 1 : 

(XMMLER OTfVWISION AND EVALUATION REPORT 

Due to the constant and rapid updating and 
enhancement of numerous compilers, ana the 
different utility, appeal, speed, level of 
communication, memory usage, etc-, of 
different compilers, the following services are 
now being offered with periodic updates. 

This service, with updates, will allow you who 
are wary or confuseo by the various claims of 
compiler vendors, an opportunity to review 
comparisons, comments, benchmarks, etc., 
concerning the many different compilers on 
the market, for the 6809 microcomputer* 
Thus the savings could far offset the small 
cost of this service- 
Many have purchased compilers and then 
discovered that the particular compiler 
purchased either Is not the most efficient 
for their purposes or does not contain 
features necessary for their application. 
Thus the added expense of purchasing 
additional compTJer(s) or not being able to 
fulfy utilize trie advantages of high level 
language compilers becomes too expensive- 

The following COMPILERS are reviewed Initially, 
more wlfl be reviewed, compared and 
benchmarked as they become available to the 
autho : 

PASCAL "C" GSPL WHIMISCAL PL/9 

Initial Subscription - $39.95 

(Includes 1 year updates) 
Updates for f year - $14,50 

S.E. hCDIA - CPI 

5900 Cassandra Smith, P06 794 

Hlxson, TN 37343 

615 042-4601 



WORD PROCESSING SOFTWARE 

SPELL 7M FIX finds and fixes your spelling and typographical er 
rors Cassette or disk versions cost jusi Sb9 2 l ) wub a 2(1 (KM) 
word dtcnonary KLEX version $178 ?>H 
75.000 word optional dictionary costs $5(1 additional 
ALL-IN-ONE editor word processor mailing list program costs 
550 (STAR DOS version) or $7f> IFLFX version* 

DISK OPERATING SYSTEM 

STAR-DOS provides the power ol a big DOS with the simplicity 
of standard R S disk format $4 l ) W for 16K 64K systems 

SYSTEMS SOFTWARE 

HUMBUG is the famous ottO<) monitor debugger adapied to the 

CoCo $39 95 for loK or S2K disk or tape systems $59 95 for 

64K systems using STAR DOS or FLEX $29 95 for the MC 10 

REMOTERM lets a terminal or modem control the CoCo or 

MC UMor $19 95 Disk or cassette 

COMMTERM communications lermmal program for the MC 10 

costs just $19 95 

NEWTALK reads nut memory contents in words ihruugh the TV 

speaker $20 Disk i h r .issette 

HOME FINANCE 

CHECK 'N TAX lets you check on your bank Not lust a 
checkbook balancing program but a help at tax nme loo $50. 
disk only 

EDUCATION 

Numerical Methods is a college level course on computer 
mathematics $75. disk or cassette 

GAMES 

SHRINK is our version of Eliza lor $15 Disk or cassette 
THREE- D teaches spatial relationships through three 
dimensional tic tac toe $25. disk or cassette 



Star-Kits 



PO SOX 209 M 

MT KISCO, NY 10549 
(914) 2410287 J 



mvlti - GRAPH 

M urti mode-C okH-Gra pft to-vkJeo-Control le# 




K>rG65DC-8v« Iho ultimata *11 i* orm graphtea Controller 

• Si£4i2 3 dothJqriraan^/tkm, 14 M*« dot clock • 197 «nr** 00 board ieraanmampry U» 
7 mooparidarit ptciuro* • programmable cofcw.loo* uP-iable for « ol 40*6 P«>g# colon 

• t>6w modes mckido lovoi of oreyacjie • */v •a— a iire um p-aOdteaaing by 12 (Ml 
reglalera. to lhare are no wrePP-eround effecle {« • »ym * endY reaotuUon, lm»4 fie»e lha 
unw length in Jf. and Y -direcHon (1) • prog he id* ASOl char generator wilh batk: 
reeofutfon of 1 Si dolt, pfoorimnuioto ^ndttvndanl ho* and vat 1 16 toom. nfled 
chtr»cv^» m X and V direction • hard* vector generator mm 4 fypee ol Dnee. 1,500.000 
&*§/% • 3 powerful operation mode*, elmuh: colored and htw rjieprey, apeeial baw mode 
»"ow» eeleuftofl of any combination of memory plana* 10 diepiey with no gray ecaling |f> 
4J raad-mod^r-w»iia fXenKvare for non-ooairucthre movement of croeahaiile). eureorfi) or 
oihwr ngurat {'I • ttrty (WomM. jumper •♦* 32 «>V»» aMraaaranO*. 16 ox 20 6* •«c>T»MH»g 

• I or 2 MMi oparation fj Indap programmabla na(d««r»-Mlr>f<Htg on all 1 pianaa • pro- 
grammabia wrKa.p#ottcbon and djiotay aai for aitpfitaa • build tn ikghioan i««faH%c« (on 
ool bat.ltl • inwrruptganaralton on MO or FlAQ horn many aou^4>a • ptoofommjibta 
como vklao tnpul allow* working wrtn only ona monflDf lor lamuna* and gr«pn»<a dJaplay 
|in b»w moda) • ontvaraal ROB and comp «ittao ooiouU. CC1R 625 Iknaa W) Mt, (nt**l 
oopandandontyonmon^torvsync andr>o^onMrMfraqwancytnr>aartyallQiualiryR06morvtcrt 
ara ava»Hab»o lo# ifrti formal (Mt| fj dangnad lor aaay ao^wa^ tmpfamaniatKin. ploflar-hKa 
programming f SSSOC but, high oualrty pc board aoioWmathad and airt. %cnt*Q rwm 
atamjard formal S4' 12*. btil Ma Inio moat S*nrTPC andOMIX aytfarM laaa pKtoral 
Standard dati*ary ■• 

high quality pc.boaid. aoamaUCa. manual EF 936S dala ahaal. autfouWna pacAaoa m 
ASSEMBLER (6609). BASIC C. flfiSCAC fO«lRAN77 UK aaay program intailadng 
Sourca ooffa on FLLX09 compatlbla ttoppy 

SSSO-Bua boartJ wilh all taaltiraa S I6rd 

high apoad Ughipan with SO naac oVayand »«rtoh S 335 

tpaaiai adaptata ai* avaiibihta for A (*>LE and CO«AJf*)OflE f Inclwda caao artlh powo# »i>pply) 
pl*a«0 aiV for dalailfad IniormaVon FUX09 ia tmdtmara of BWTPC 



Dapl kig Jurgen hnauft 
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GOOD NEWS! 
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CORPORATION 

6/7 W, Virginia St. 
Milwaukee. H7 5:120 1 
(4 1 1) 276-2937 



c 

for the 

6809 

M^ NEVER 

BETTER! 

INTROL-C/6809,Version1.5 

Introl's highly acclaimed 6809 C 
compilers and cross-compilers are now 
more powerful than ever! 

We've incorporated a totally new 6809 
Relocating Assembler, Linker and Loader. 
Initializer support has been added, leaving 
only bitfield-type structure members and 
doubles lacking from a 100% full K&R 
implementation. The Runtime Library has 
been expanded and the Library Manager is 
even more versatile and convenient to use. 
Best of all, compiled code is just as 
compact and fast-executing as ever - and 
even a bit more so! A compatible macro 
assembler, as well as source for the full 
Runtime Library, are available as extra-cost 
options. 

Resident lntrol-C/6809 compilers running 
under Flex or OS9 are priced from $375; 
Uniflex, from $425, 

Cross-compilers for PDP-11/Unix hosts are 
priced from $1500. 

Trademarks: 

Introl-C Introl Corporation; 

Flex and Uniflex, Technical Systems Consultants; 

OS9, Microware Systems; 

PDP-11, Digital Equipment Corp,; 

Unix, Bell Labs. 

For further information, please call or write. 



i 



so 



66* Micro Journal 



OS/9™, FLEX™, UNIFLEX™, IBM PC™ Software 

SUPER SLEUTH DISASSEMBLER $99 FLEX S100-UNIFLEX S101-OS/9 

fhtt program procetft** 6800/1 / 2/1/ $>S/9 6502 program* enabling Ihe user to mteracliifety anahfie. modity and ditasaemble Iwitft laOetat ob*ct cods, with oulpui CO 
lirmmii, pr»nler and disk and oo»r reference and ta6e*-de1mit«on capabil<f»eft Object-Only l©# Color FLEX SSO. Color 008 *«•. Color OS/9 SSO 

2-80/8080/5 SUPER SLEUTH DISASSEMBLER $99 FLEX $100 UNIFLEX $101 OS/9 

T^is version or SUPER SLEUTH Oroeemset Z eO/BOeQ/S obtecl code on tie 6800/1/9 

CROSS-ASSEMBLERS each $50 3/$100-FLEX each $60 5/S120 UNIFLEX each $55 3/$1 10 OS/9 

These programs and macros enable ihe user to process 6000/ 1. 6605 2 60 6080/5 programs in original format 
Ihe ISC macroassembler «s reouired for FlEX/UNIFlEx and ihe OSM assembler is required Tor OS/9 

[14] 6805 and 6502 DEBUGGING SIMULATORS each $75 FLEX $80- UNIFLEX $100 OS/9 

these programs enable the user to interactively analyse modify and debug (1416805 and 6502 obtect code 

6502 TO 6809 XLATOR SYSTEM $75 FLEX S80-UNIFLEX $85 OS/ 9 

this program enables Ihe user 1o iranslale 6502 assembler code inlp6809 assembler code noting me*ac1 conversions 

6800 6809 a 6809 PIC XLATORS both $50 FLEX $60 UNIFLEX S75-OS/9 

These orograms enable ihe user to translate 6600/ 1 assembler programs 1o 6809 mnemonics and to eanven 6609 programs lo POSiltorvrndependenicode and data, uung 

PC S UL X and Y as base registers 

OS/9 and UNIFLEX SIMULATORS FOR FLEX each $1 00 FLEX 

The programs enabte ine user 10 debug OS/9 snrj UNIFLEX assembler programs uSinQ ihe TSC DEBUG and Oiher facilities ol FLEx 

DISK UTILITY PROGRAMS all $50 FLEX 

These programs enable Ihe user to hst/modirv The SIP to edrt sectors to lesl Prime disKeltes 1o lineage Ihe Iree 1 »a»l to back uo one die* lo anotner elc 

FULLSCREEN FORMS DISPLAY {6809 X BASIC) $50 FLEX S75-UNIFLEX $60 IBMPC 

These programsenable the user to define and generele labia driven lull screen diapiay and dala entry programs 

FULL SCREEN MAILING LIST 6809 X BASIC) $100 FLEX $1 10 UNIFLEX $105 IBMPC 

Tnese programs enable tne user lo define and mamia^n mailing hat oriented data bases 

FULL SCREEN INVENTORY/MRP {6809 X- BASIC) $100 FLEX $120 UNIFLEX $1 10 IBMPC 

Theie Programs enable the user todeltneand maintain inventories andtnctudehierarcrnai materials requirement planning 

TABULA RASA SPREADSHEET (6809 X BASIC) $100 FLEX $125 UNIFLEX 

These programs enable Ihe user to generale and maintain tabular comoulation schema s providing a simple user interface and SOPhisiicaied report generatMW Similar 10 

OESKtOP/PlAN (TM OesMop CompuUngt 

5 25 DSDD SOFT-SECTORED DISKETTES $1.50 each in 50' a 

r«rtth Tyve^ **Cfc*n hub t>nq\ «r<te-x»o*«cl labs and nt>ek ADO 14 00 PCH 50 FO* SMiPPiNGl 



PtOQtmm* m »ovrc« on d.%* «p«c,ry mi io*& denary rype. eomooter CvS 

Oeiaiied prmied manuars provided «*th «m p*edwei« 

For VISA and M ASIC ACaAO 9+* account «tpd«i« phone US funOS onty add S%1 lOV for«<gn| fv »rt«iiv*g 

Ooen Pvtfcnaia r>den *•# and B ralad c«*«li onty Can or wnia lo* catalog and Oeatar mrormaiion 

'FLEX -t a trademark ol f echncai Siniams Consonants '0S9 is a trademark rji Microware 



Computer Systems Consultants* Inc. 

1454 Latta Lane. Conyer*. G A 30207 

Telephone Number 404-483-1717/4570 



SOFTWARE,. 
HARDCORE 



** FORTH PROGRAMMING TOOLS from the 68XX&X '" 
" FORTH speclafists — get the best!' •• 

NOW AVAILABLE — A variety ol rom and disk FORTH systems to 
run on and/or do TARGET COMPILATION for 

6600. 630176801, 6809. 68000. 6060. Z60 

Write or call for intormaiwn on a special system to IK your require- 
ment 

Standard syslems available tor these hardware — 

EPSON HX-20 rom syslem and target compiler 

6809 rom systems lor SS-50, EXORCISER. STD. ETC 

COLOR COMPUTER 

6800/6809 FLEX or EXORCISE R disk systems. 

68000 rom based syslems 

68000 CP M-68K dtsk syslems. MODEL II 12/16 

tFORTH ts a refined version of FORTH Interest Group standard 
FORTH, faster (ha FIG-FORTH FORTH is both a compiler and 
an interpreter It executes orders of magnitudes taster than mler 
prettve BASrC MORE IMPORTANT. CODE DEVELOPMENT 
AND TESTING is mucn, much taster than complied languages 
such as PASCA and C. If Software DEVELOPMENT COSTS are 
an important concern for you. you need FORTH' 

firmFORTH** is for the programmer who needs to squeeze the 
most into roma, It is a professional programmer s tool for compact 
rommaWe code for controller applications 

* If OWTX and armFOfmn ara traaemarSs o» Tafboi Ht cnmyv B wm 

* FLEX is a trademars of Teov*car Sytiemt Cor>sur\ams »x 

* CPM^SK * tradamars of Otpta) Resaareh mc 



tFORTH*" 

from TALBOT MICROSYSTEMS 
NEW SYSTEMS FOR 
6301/6801, 6809, and 68000 

«-> tFORTH SYSTEMS < - 

For all FLEX systems: GtMIX, SWTP, SSB. or EXORcisor Specify 
5 or 8 inch diskette, hardware type, and 6600 or 6809. 

" tFORTH— extended fig FORTH {1 disk) $100 ($15) 

with fig line editor. 
" IFORTH + — more! (3 5* or 2 8" disks) $250 ($25) 

adds screen editor, assembler extended data types, utilities, 



games, and debugging aids. 
TRS-80 COtORFORTH — 



available from The Micro Works 
firm FORTH — 6809 only. $350 ($t0) 

For target compilations lo rommable code. 
Automatically deletes unused code Includes HOST system 
source and target nucleus source. No royalty on targets. Re- 
quires but does not include tFORTH + . 
" FORTH PROGRAMMING AIDS — elaborate decompiled 150 

•• IFORTH lor HX-20. in 16K roms for expansion unil or replace 
BASIC $170 

" (FORTH/68K for CP/M-68K 6" disk syslem $290 

Makes Model 16 a super software development system. 

" Nautilus Systems Cross Compiler 

— Requires tFORTH + HOST + at least One TARGET: 

— HOST system code (6809 or 68000) $200 

— TARGET source code: 680OS200. 6301/6801— $200 
same plus HX-20 extensions— $300 

6809— $300, 6080/Z60— $200. 68000-4350 

Manuals available separately — price in ( ) 
Add $6 system tor shipping, $15 Cor foreign air 



TALBOT MICROSYSTEMS 1927 Curtis Ave.. Redondo Beach. CA 90278 (213) 376 9941 
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X TOLL PftCC 

1-800- 



338-6800 ffk 

5900 Cassandra Smith Rd, 
Hixson, TN 37343 

for Information 
call <8i5) 642-4601 

COCO OS-9" rtix" 

SOFTUMRE 



ASSEMBLERS 

(ten Asvssduv 
the FLEX SIMGMD AiMntl*r 

F.OCF $56.6fci 
sting r in ■ J In i w Linking Loadmr 
Use with many of the C and Pascal Ctrpiisrs. 

f,ocf $151.00 

Onset Plains Gasp, Qa, 

HWML 

and Unking Letter fee tha 6809 

Supports Recursive HftCTcs, Cer>ditional Aaserrfcly, etc. 
Optional X-Raf Lilting. Includaa a Snail UPf- 
oriented &Utor aa part of tha Aasartiler. 

r,0CF $150.66 
F,CCF w/SoUrce $366.06 



tftnLU 
itlng Aeejeebiae- and t****^ Lt^dex 
2-pass Rslocatlftg Aasejifcler; 2-paas Unking loader. 
Supports 6 Char, labels, 8y»iwi Calla (SW£x3 FCfl x>. 
Expressions with Arith., Logic, and Shifts, etc 

F.CCF S12S.M 
One Year Viaint. $56.60 



By Graham Trott. A combined Editor and Assembler 
designed to allow the Prograrmar to Enter, ant, and 
Assemble Programe with a minima* of effort, w/o 
leaving the Program. Designs*] primarily for annll to 
medium sized Program Oevelopietnt. Includes X**(X a 
CkoM ruiastilM for the MC68C6/1/3 and Hitachi KD6301 
(CMOS 6801). 

F,CCF - $96. « 

DISASSEMBLERS 



Computer Systems Consultants &t*r Sleuth is a "hw 
Teeted M , reliable, PROVEN Disaeeembler that hae 
gained acceptance through out the SS-SO Bus 
Community ae an extremely POWERFUL, INTERACTIVE, 
Software Tool. The Super sleuth Software Package 
conelate of 3 Programs; SLOTTM (the Ctsassertoler), 
CBOtfAM (used to globally Change Labels to a 
meaningful Name), and XSXF (a Croaa Reference 
Generetor for Source Code Files). SLEUTH will 
Dlsassfttbls Hsmory Resident 6869 Code and 6600. 6431, 
6602, 6803 (the "Baby CoCo"), 6805, 6fl0a, 6609. snd 
6502 (Apple, Atari, Ccsmodore, etc) Binary Disk 
FUss. (See Aug. '83 '66' Micro Jcumai "Color Users 
notes* Cblum tor a full Review.) 
Qitor ftssjsffer 88-56 Bus (all w/ Ounce) 

CCD (32K Reg'd) 

Obj. Only $49.0 F t S99.0B 

CCF, Obj, Only $ 56.60 IL $166.0 

CCP, w/Source $99.66 0, $161.06 

COD. Obj. any $56.66 



OYiftMPl ♦ 
An "eaay to use*, powerful OLaaesetnbler for Dtek 
Resident 6809 end 6800 Binary Files. Allows the 
development of a "Control File" of various Program 
"Boundaries'* during eucceeatve dieassenbliee? can use 
a Label pile which automatically replacee a Hex 
location with a Label >£rw: Includee an XJBP Utility; 
etc . Label Filee provided for Mim-FLEX, FLEX 2, 
FLEX9, Color Computer (for uae with Color PL£X 
Systems), etc. OS-9 Version includes special o&~9 
options. 

CCF, Gbj. OMy $le«-66 

CCO. - " $156.66 

F, $166.66 

0. - $156.66 

U, " $168.66 

COMPILERS AND DECOMPILERS 

6fi09 "StrvxrcAirerf" MssMily Lang. Qaejdlera 



Pl/9 

By Graham Trott. A "Structured" Assantoly Las^uage 
Editor/Consiler/Oebugger, all in ONR PACKAGE: provides 
a totally <BT0<ACrTVS Program Development Cycls. The 
Coinpjler ata^z>rts large Syjitnl Mamas, Variable Typea, 
Polntere, Control Structures, Stack, A- ,B-» *nA 0- 
Register manipulation, etc. Tha 9ajrc*~0rie» ted 
Trace/Debugger providea Single Stepping, Break- 
pointing, etc. An excellent Software Oevelopmvnt 
Tool for utilixing the poor of the 6609 in developing 
small to nodlAj* sized packages. 

F r CCF - $196.66 



PftSDIL. ( 
Native Code QjrpJler (UCSD Oriented). 

F and CCT - 



PAS>L ^T 1 '- 

P-Code Ccp^Uer (ISO Standard). Oesigned eapndally 
for MicrocoKsputer Systems; Run-time Syatem checks 
available reaourcee for each task, allowing operation 
on even minimal coifMter tystcpsj. All/xe linkage to 
Assembler Cbde for majtina-t flexibility. 

F and CCF r - $196.60 
F ft" - $205.66 



PASCAL < 

For the PROF 188 lOetAL: 180 Baaed, Native Code 
Cornier, primarily for Real-Time and Proceas control 
applications. Use custom I/O device* in place of the 
Pascal TKPUT and OUTPUT: long Int. (32 Bit); Dynamic 
length etrlnga; Interrupt process 1j>9, ROn»*ble, PIC, 
Re- Entrant Cbde, etc. PDsSVUIi Includes Source for 
the SjfrtMUc Oebv^ger, Runtime, and several Utilities. 
Requires a ^fcxonola Qjepatible* Relocating Asssntder 
and Linking Loader. 

F and CCF - $425.66 
One Year tternt. - $166.66 



DlB (a UhiFLfX "basic" o*-o*piler) 
Re-Create a Source Listing from UniFLEX Cceipllsd 
basic Programa. Easy to Use; works w/ MX veraiona 
of UniFLEX basic; Output to Oisk or Terminal. Time 
TESTED and PtCVEN; SOLID* 

U - $219.99 




"FL6X »s a trademark o< Teenncal Syst*"* Consufcama 
*0S9 « s iraostnark of M»e»ows/» 




A full-featured C, atreamllned for the 6809. 
Generatee very efficient object code. Output 
^benchmarks" cloae to 10HHz 68000 in 8 Bit 
Operatlona; l.S times fastsr than a 4 tffe ZS0 When 
uelng a 2HHs 6809 Syatem (Re. p 43, "68" Micro 
Journal, >tty '83). Floats, etc. 

F, CCT, and - $375.61 

U - $425.61 

One Year Malnt. - $166.66 



Availability 

f - FLEX, CCF - Color Osepute* FLEX 

II • OS-9i GCD - Color Computer OS-9 

- UhiFLEX 

CO) ■ Color Computer Clstc 

OCT - Color Computer Tspe 
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Paecal *jdt required 
Allowe reading T8C HUll-FLDC SSB DM68* «k) I&gltal 
fleeearch CP/M Dleke whllf operatic under FLEX 1.0, 
FLEX 2.0, or FLEX 9.0 with 6800 or 6809 System*. 
COPYCAT will not o*rfor» »Qra£l**, but. t»c w m the 
program And the manual, you stand a good chance of 
accomplishing a tran*f*r. Include* utilities to Li*t 
Directorlee. copy File** and ajjvert T*xt niaei wten 
required. Also Includes a Utility tor lnv«*tlg*tJi>g 
prryiuosl Qzrpatiblllty proolams . Program* supplied in 
Modular Source Coda (AeeertDly Languaga) to saXa it 
eaaler to eolve unuaual problem*. 

F and CCF 5" - SS0.M 
F 8" - $65.00 



Thia B*elc*9 Crpae Reference Utility is a 9aaic09 
Program vtvlcS will produce- a "pretty printed" listing 
with each line numbered, fallowed by e curplete croae 
referenced listing of all variables, external 
procedures, and line numbers called. Also included 
la a Program List Utility which outputs the 1-istutg 
without the overliead of building tt»e cross reference 
table, which allows It to run considerably faster when 
only a "pretty printed" listing with line narrfcers is 
deeirad. Aequiree QaaidW or fer>0 for operation. 



BIT «|^tlh(*4M 



f ■' (I***** "»■• 




and CCO - Ob j. Oily - S39.9S 
and CCO - w/ Source - $79, 9S 



0-P 



Ofi/9 to PI2C - nac to QE/9 

Finally! the barrier has bean removed between O6/9 
and FIBC farraatted disks! tt*r you can READ fro** and 
WRITE to. a Sing Is Sided $* or 8" FLEX diskette from 
0S-9 with O-F. O-F is a new and unique program, 
written in BA81GB9 (with Source), that pscfam* the 
fallowing functions; 
CEPOaaTi A BAflnsg Program that raJbm*t* a chosen 

amount of an CfcV-9 disk to FLOC Fox*at so it can be 

used normally by flex, 
FLSCj A BAS1GJ9 Program that does the actual read 

or write tactic to the special O-P T ffsu Ea*fc. 

ill selected from e user-friendly menu, PunctJnns 

provided Include reading the FLEX Directory. 

Deleting FLEX Filea. Ccpylng both dlrectlone. etc. 

All selections era Interactive and cccnnlete. 

Including all necessary prempts to the operator. 
FLEX users csn road, write and use the special disk 
as sny other FLEX diek. provided the FLEX dirsrtcry 
is not allowad to continue beyond track taro (too 
many filea). 

F and OCT" - S79.95 



V TOLL FftU 

1-800 



338-6800 m 

J0* fiat? 

5900 Caaaandra Smith Rd. 
Hixson. TN 37343 

for Information 
call («15) 842-4601 

COCO OS-9'* FLEX" 

SflFTUI/lIlE 



defined l/o; producee fOtoble. relocatable, recursive. 
re-entrant Code; Structured atyle and statements 
with Procedures and Modules; supports Byte and 
Doic>le-&yte primitives with 3 types of Integers (up to 
32 bit). Char and Boolean, and unlimited aixed Arrays 
(vectors only); Interrupt handling; unli/rateri length 
variable Names; Variable Xnitialixation (defaulte to 
$00); Include "Source File" directive; Conditional 
compiling; direct Ood* insertion; ocntrol of the Stack 
Pointer) etc To quote Ren Anderson in his review of 
fJUDtSUaL in the Sept. '83 laaue of W Micro Jasmal 
that, except for the Uck of Qoate. ".... 1 hove to 
give thia one VBTY Mgfh rating. . ..". it is a FAST 
Compiler which producee FAST Code (hie "Primee" 
BsnchnArt ran at 9 aaca. on a 2 t%tz System). 

F and CO* - S195.4B 



— Copy LAJVZ Disks to several — TTei disks 

The following FLEX utilities allow tlie backup of NTT 
aire die* to any SHALL0) aire diskettes (tfe<h**ter 
to fi'e or $'e, 8" to 5'e. ttc^)^ By simply inserting 
diekettee as requested by CSPYMTLT. a large diek 
eyatem may be downloaded to your present Qcppy disk 
system, any eize. tto need to fiddL* with directory 
delation* or aizy of the other t«dicwa operations that 
must be done using the normal copy routine* » 
QDPTPUl/r.CXD understands normal "copy" syntax and 

always ksepe up with fllee already copied by 

maintaining directories for both host and receiving 

disk system, eliminating hours of tedious keyTfcard 

entriae and other time consuming cleanup chores. 
BACKUP. CKD is a special program that downloads 

"random" type a lee. airy eixe. 
ttJTOTORl.CMD s epaeial program to restructure ccplad 

"random" files for copying, or reccpying bade to the 

host aystsm. 
FBBLDfK.CMD a "bonus" utility that "relink*" U* free 

chain of floppy or hard disk thereby eliminating 

fragmentation* 

anted saunas Ola* h 

(8" or 5") $99.5 



Need the Ease of Design and Maintainability of 
"Structured Progressing- Mf> the Speed and Control of 
Assembly Language? Then sHVCULM. was designed for 
yout TTUe Single Pass, flecureive Descent Qorpiler 
providee the tool for d*veH*nng simple Utilities to 
MAJOR Systems in Assembly Language. Supports 3 "I**" 
Levele which allow one level of Procedure nestuig. or 
more within *>todulee". It is aasy to develop program* 
written tor other machines since you are working at 
the Assembly Language l«v*l. Feature* unified, user- 



Raquires til* and DISPLAYS On Any T>pe TSonMnal 
Feature a i 

•Four levels of play. 

•a^p aide. *K>lnt scoring system. 

"Two display boards. •Qvinge skill \tr"*l. 

•Solve Owdonlf prdtklemB in 1-2-3-4 n^s. 

"Make move sirf swap aids*. •Play white or black. 

Tlue le one of the etimjsvt Offxs program running 

on any microccssputar. estimated USCF Fating 1660» 

(better than moet 'Club' player e at higher levels). 

F and OT - $79.95 




m f L€x *9 s irsdsminx cA Tachnteal Systems Con$uh*ni$ 
"0S9 ii a uademarit of MtcriMrara 



■ .-o^»| ^ AftV H AAM 

-f-wJ^W^oc^ii^ndrt Smith Rd c»Co **•;- Pill- 

% ¥ ^ M, -" n 1H 573 * 3 SflFTlDflRE 

^ .mo (bis) s4?-4«oi HMI I atHIIIII 



MaiLlablllty 

P * FLEX, OTT ■ CoJor Compxiter FL£X 

• OS-9, OCT) ■ Colnr Computer OK'9 

a - UhJFLEX 

CO) - Color Computer Disk 

OCT ■ Color Computer Tape 
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X toll mi 
1-800 



338-6800 m 

6900 Cassandra Smith Rd. 

Hixaon, TN 37343 

for Information 

Call (816) 642-4601 

CoCo OS-*" FLIM'" 

SOFTWARE 



UTILITIES 



DUT^fttAC Fonciitir it en XBASIC program that 
plana a diet In terme of althar calorlaa and 
psrcsntsgs of carbohydrates, proteins and fata <C P 
C%> or grama of Carboliydrate. Protein and Fat food 
axchangaa of aach of tha en basic food groupa 
(vagatabla, bread, meat,, ekm nalX# fnUt and fat) for 
a spaclfle individual. 

Sax, Aga. Halght, Praaant Weight, Frame Site, 
Activity Level and Baeal Metabolic Rate for nomal 
Individual are taXen into account. Ideal weight and 
auatalnlng calorlaa for any weight of the above 
individual are calculated. Whan a weight goal la 
given (either gain or loaa), and a calorie plan is 
agreed upon between the computer and the individual, 
the number of daya to reach the weight goal la 
projected. 1*he etarting and erxling rate of weight 
loaa la calculated, and a daily calendar with each 
de/a weight for a 3G-day period is printed. 

F - $59.95 
U - £09.95 



for the LfaULtt OperstlAg 9ystem 
Aliowa IHLFLCC Baaed ffretasa to Transmit and Receive 
filea to and from other Coipjtsr 9ystems vie Modem. 
Ues with CP/h, Ham Frames, other UhiFLDC 9ystems. 
etc. 

— Verifier Transmission integrity using 
checXeum or CRC 

— Automatically Re»TTan»Mts bad block* 

— Transmits data In 126 tyte blocks 

U - $299.99 



Jiwr 

Text Pomettsr 
JU6T* a Text Formatter developed by Ron Anderson, 
provides name roue features which cnaVe it a valuable 
addition to any FLEX Users Software Library. JUST is 
dealgned for formatting Teat Outfut for Dot Matrix 
Ptlntars and provides many unique gestures? 
-Output the "Formatted" Text to the Display for 

format anaiyeie end change. 
-Output the "Formatted** Text to a Text Pile for uae 
with the supplied nvr.Of) tor produti/xj multiple 
coplea of the Text on the Printer INCLUDING 

imbedded printer cavuuros (this utility is very 

useful st other times also, and worth the price of 
the program by itself) . 
-"Dear Configurable" for adapting to other Printers 
(comes sst up for epson MX-66 with Grsftrsx)j 



provides for up to ten U0> imbedded "Printer 

Control Commands*, aueh ss itsllcs on and off, 

boldface on and ofX, etc* 
-Automatic ecsapsnsstLon fbr s "Doubl* Width* printed 

line. 
-Includes ths normal lire width* margin, indent, 

paragraph, spaaa, vertical sXlp lines, page length, 

page nuBdbMTVxj, cantering, EUL justification, etc. 
-Use with mt alitor. 
-Supplied with "Structured tourtas" Oa/xlrush nJ*)i 

easy to see the flow of the program. 

F and CCF - $49.95 



XAbT — produce a Croaa Reference Hating of any 
text; oriented to Pascal Source. 

f and OCT - $25.8* 
ISdUOR — allowi the inclusion of other Files in a 
Source Text; has unlimited nesting capabilities. Also 
aliowa Binary Flls Inclusions, 

F and CCF - $2.as1 
PROFILER — producea an Indented, Numbered, 
"Structogram" of a Paacal Source Text File. Allows 
viewing the overall atructure of Large programs* and 
provide! cluea aa to the integrity of the program. 
Supplied as Source Code/ requires Q0spilstion> 

F end CCF - $25.61 



Eighteen (18) different FLEX Utilities thet shruld be 

s psrt of svsry FLEX Ussrs Toolbox. Tsn &ASXC 

Programs tot 
ctnpere, Merge, or Generate Updates between two 
BASIC Programs, check 9ASIC Sequancs eXssbara, 
compare two uneequartaed files, and S P rograms for 
eatabllahing a Maetar OLracrtczy of several QLsXa* 
end sorting, sslscting, updating, and printing 
paginated Listings of these files. 

The other 6 Programs provide .CM) Piles which allow* 
Qopy a File with CJC Brtrare* so it can possibly be 
salvaged; Teat Disk for errors; Qxspara two OLeks; 
a faat Disk Backva? Program; Edit Disk Gact<rer 
Linearize Pree-Caain on the Disk: print Disk 
Identiflcstion; snd Sort and Rep l ace the DisV 
Directory (in sorted order). 

ALL Utilities include aourta {either BASIC or Source 

Code). An eJCOlXEOT Value! 

F and CCF - $5*.eal 



•\2J!pitsr Cactjrr^ry* 
OVER 120,000 wordsl 
No mors "Let y>tr fingers do the walking thrtx^) the 
Dlctloneiy" whils you art sntsrlng Tsxt with your 
fevorlts Editor or Word Processor. GPtLLB is nxws 
than juat "another spelling Checker"; it allocs you to 
look up a word from within your Editor or word 
Proceaaor so that you too* It Is right WHB* TOU TYPE 
XT IN with the fiPH.CMD Utility (which operates in the 
FLEX Utility Spaas). Y #tt it ALSO allovs you to check 
and update the Text after you are finished; along 
with allowing you to ADD WORDS to the Dictionary, 
"Flag* questionable words in the Text for evaluation 
later. "View a word in context" before changing or 
ignoring, etc. 6PEXXA firat checks s Toitdi Word 
Dlctlonsry", thsn ths normal Dictionary, than a 
"Peraonal Word List", and finally, any "special Word 
Mat" you may have •pacified. 67BX8 also allows the 
use of Ssall Disk Otoraaa systems. 

F and OCT - $129.95 



Feat Computer Dictionary — allows directly changing 
the Text File, adding words to the dirrionary, etc. 
75.000 words Ln less than 400 sect/are. 

F, CCF, CB/9 - $125.00 
U - $175.01 




"FLEX it s tradems/a of Technical Systems Consuflants 
"OSS t% a tredema/N of Micro*** 



X '3ll 'Ml 

1-lOO-lll'tROO 






toot Miili 



• masfidrs Smith Rd 
Hlntorv TN 97343 
♦nro (4 is) #42-460* 



CoCo o*-a- m«- 

SOrTVDARE 



a-eUabUlty 

P n t LEX, CL7 » Color Comeut«r FLEX 

O « OB-9, CCO - Color Computer 06*9 

U » UhiFLEX 

CCD » Color Computer Disk 

CCT ■» Color Computer Tap* 
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DATA BASE MANAGEMENT SYSTEMS 



PoeelMy ana of the moet pc**rfUl Oatabaee >**v*9sn»nt 
System* 1 available, this machine language program is 
email enough to oparata on a alagle sided 5" die*, 
yet provides tha apaed of N.L. and paexr Limited only 
by tha ueer'e imagination • Thia aelstlonel QMS 
eupporta Sequential. Hierarchi/sal, and Random Aazu 
File Strocturee, and haa Virtual Mmry eepafcrfjitlee 
for thoae Giant Data Baaee. Eaay-to-uae English 
Lengimqe Qxnoond Structure. 

XUC — F and OCT - $179.95 

XD6» <w/ utlla) — F end CCF - $249,95 

Manual only — $19.95 



JO* l*J litis* 
Thaaa ara part of XDOt, includes SET which pro/idea 
TTYSCT Type of control* within tha DM5. PLOT producee 
horizontal grapha of data, CWYDEF defines new fiiaa 
with exietlng format ft, A&VISS allova modification of 
f laid definitions, CVTJVT provide* an ASCII outpit of 
a QMS film, INPUT loada a File from user generated 
text, PURGE eraaee ell Data from e File, FOW dieplays 
tha print format, SIZZ provldae no. of record a and 
e actor a info, and FILE output* a file name matrix of 
a gb*n file extent. 

XXMS Utile, (require* XD>6 VI. 1) $79.95 



> 09S 

An XBASIC. Menu Driven, DBMS with "Built-in* Audit 
Tracking, Extremely Powerful Report fc Format 
Capabilities, etc. TTus *fc*t Pluiasj »6 will berate) 
the ykxtk ttsree" of your Sc#cae*r* Stable. 

F and CCF $295.0 
U $J9S.00 



WORD PROCESSORS 



AUfcrd end 



EXTREKELY Powerful Screen-Oriented Editor /Word 
Proceeaor . Alfoa t SO different ccunnnda; EXCELLENT 
Documentation (over 300 pagae). including a full 
Tutoriel Section to help you leern how to u*e the 
eyatem. Feeturea Curaor -baaed editing, dynamic 
Screen Formatting (what you aee le what you get), 
Multl-Column dieplay and editing, "decimal align" 
columna (AND add them up automatically, if wanted), 
define multiple keystroke macros, even and odd page 
number headere end footer*, imbed printer control 
codee in text, full justification seats of carmAnd*, 
full "help" eupportr etore amxx conna^3 eeroes on 
dis* for future uee, etc. Easy •Set-Up" (for example, 
you juat hit the key you want to use for a apecific 
function, euch aa "curaor up", end the Syetem reads 
an etoree that key - no digging into tech manuals for 
codae, etch uee eupplled "aet-upe", or remap the 
keyboerd to whet you ere uaad too. Except far 
pmporUmel printing, this package will 00 IT ALU 

6800 or 6809 FLEX or 53B DOB, OS-9 - $175.00 

Gksmt Plains 



A fidl-screen oriented word PROCESSOR — (row runs on 
the Dets-Ckxep end FML Cfaksr fUK Systems; uses the 
51 x 24 Ditpley Screen*). Full acreen display and 
editing (i.e., what you eee is what you get); eupporta 
the Daisy Wheel propKsrtksnel printera. 

F and O * $295.00 
U - $395.00 



Craetly extende the power and flexibility of 
TTTftTIFa. Allove HUltlpls Text files to be printed 
out aa one lerge document. Provldae for merging 
information Into the Text File during printing (eud* 
aa different names ajid addreaaes), ate. 

F, OCT. O - $145.0 
U • S19S.00 




V TOLL PPIII 

1-SOO 



338-6800 JJR 

% rftaoit 

5900 Cassandra Smith Rd. 
Hlxson, IN 37343 

for Information 
call (015) 042*4001 

CoCo OS-*'" FLeW" 

SflFTUl/IRE 



ACCOUNTING PACKAGES 



(anest Plains fFafiitsr 0b. 

accounting PSickegi^ 
Accte Rec.. Accts Payable 4 Gen Ledksmr — A PiAX 
Accounting Package that can be used te^ethex, or as 
aeperata packegee; provldee the H5 requires Audit 
Tracking. (XBASlC, baaed on the Tabarre Bumlnaaa 
P rog r am s.*) 

F and CCF - ea. Program $295.00 
U - ea. Program $395.00 



tadvmraal Oeta naasaiili inc. 

ArxxssRing and Ostafaear toreg. Sys. 
Note* ALL l/DRI Accounting end D6H Proge. aaxjulre 
TtMx and XBASIC. Thaee are Time Tested program 
from an old, eetablishad. 



Color Oqaputsr FLEX Syatems 

oan Part 1 - $49.95 D»1 Part 2 - $49.95 

Church attributions - Sag. 95 

Single Entry Gen Ledger - $49.95 

Balanced Billing Syatera ~ $49.95 

A/R $99.95 A/P $99.95 Gen Ledger $109.00 

inventory 2 $49.00 Payroll $99-95 

FLO and UbiFLCC — total Requires XBASIC or basic 



A/P 


F - 


$295, 


U - 


$395 


A/R 


F - 


$295, 


U - 


$395 


Gen Ladgar 


F - 


$295, 


u - 


$395 


Inventory 2 


F - 


$295, 


u - 


$395 


Payzoll 


F - 


$295. 


u - 


$395 


0BM 


F - 


S350, 


u - 


$450 



'FLEX *i a irademerk cA Techntea) Sy*1*m« Consultants 
*0S9 it a tridema/t of Microwire 




Q ssmAts jite 
FULL IA-ll£Bi OfVnrilMr/fcejP 

The Pull Screen Inventory Syetem provides a nwana of 
maintaining email inventories. Uaing e linked, keyed 
random file atructure baaed upon the item field, it 
keepe the file in alphabetical order for eeeler 
Inquiry, With the FDD cnemrxL the user may locate 
end/or print ell recorda matching on partial or 
cosplate Item* deecription, vendor, or ettributee. 
Items in beckorder or bskv aUnlmum etock levels may 
be located end/or printed thru the aame prooeea. 
Printed output may be produced In Item or vendor 
order. A materials requirement planning (MRP) 
capability for manufacturing arwirojessnts is included 
to allow the mslntananos and analysis of Hiarartdiiral 
aeeembllee of iteme In the Inventory file. It 
HSMf oafiE. 
F and CCT - $100.00, u - 5190.00 



Availability l 

P - FLEX. OCT - Color Cosputar FLEX 

O • OS-9, CCO • Color Computer 06*9 

- UhlFLC* 

OCX) ■ Color Computer Dia* 

CCT - Color Compiter Tape 
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X toll run 
1 -800- 



338-6800 ig 

5900 Cassandra Smith Rd. 

Hixson. TN 37343 

for Information 

call <6i5> 642-4601 

CoCo OS-* 1 " FLCX'" 

SOFTWARE 



The Virginia aj^wy 



Bizpack 



is a DESKTOP/ PI AN type of Program which 1* 
oriented towards Ties* Series Analyst* of Business 
Situations In providing LnfonnAticyi On which to base 
cannon business decision*. This program is used for 
■coring accnfiUng, numeric, and f^nan^iAl data, whirh 
can than be uesd for analyzing, planning, budgeting, 
forecasting, ate. while "Electronic Spreadsheets" 
ara extremely uaaful in many situational Blxpsck 
a seals in businesses v*»(i thara are numerous ecpense 
columns, revenue sources, significant business 
indicators, lsrge notteri, erratic week -t o w eik and 
month~to~nrjnth fluctuations, etc. Blxpsck helps 
determine statistical relatu?\*hifa» , establish trend 
lines, "smooth" deta vta moving averages, analyze 
seasonal data, adjust Gar inflation, lag data one or 
more perioda in Statistics or Column f\*«tuyi», plot 
dste. etc. The Program SispLay* in5jmaucr. on the 
scrsen aa Columns of Information with each Row 
confirming to a defined Period of Time (weeks, rtmths, 
years, etc.). and is very easy to use (data is easy to 
enter, change, and mniify; oaitmands can be renamed to 
suit the users requirements; unlimited ability to 
create specialised commands using common BASIC 
Statements; etc.). Requires TBtTa ertstx&ad BASIC. 

F and OCT - $135.00 
with Source - $250.80 



Purchase XBASE and BUpsx* togsther for $221.50 
— a Savings of $13.50 — 



KsVi 
Intrigued by rorth777 Here is a FORTH package 
tailored to the Color Crsspvitsri Ttua package is 
supplied on Tepe. with instructione for transferring 
it to disk If you wish. Written primarily in machine 
language, it's »p**d la unparalleled. A full 
Semgrsphir-4) ■**»*»» i» provided, along with "goodies" 
like Crsphlce and Sound Covmanda. Printer Canmands, 
Auto-Repeat and Control Keys. etc. If you are 
Intereeted 1/) Learning FORTH, a Trace Feature is 
provided which is invaluable . If you ere a FORTH Pro. 
this package provides CPU carry Flag access i£ality 4 
Fast Task Multiplexing , Qaan Interrupt Handling, etc 
(On yoo won't "out grow- the Basic c a p ab il i ties of 
this Implement st ion). (Cabins Oua package with Lao 
arable's CXLXLLEKT Book "Starting FORTH", end you will 
be a FORTH Otpert before you kjvjw it (and have a lot 
of fun doliig itl). 

Color Computer TAPE - $50.93 




Color Computer CBWf&r 0C9m FfusTT P lutjiai iB 
Dumps any "PHOOC" Screen to the Printer with the 
BASIC USR function. Shift the Printout Left or Right 
or Reverse Print (Dark for Light Screen and Vice 
Versa). All Programs on Tape. 

for R.S. LP-VtI/VIII I DMP 100/200/430 $7-95 
for f^aon w/ Qraftrax and Qraftrax ♦ $9.95 

for Qsminl 10 and 15 $9.95 

for the Prowriter Printers $9.95 



: GNLBUtA Program 
A Menu Driven FJUFUFJ) BASIC Program which allows the 
entry of up to 12 nemos per Day. each of which may 
contain up to 28 Character*, for sny day of the Month 
between the years 1700 and 2999. A tsrephJc e»i— *■»» 
shows which days contain Hemos. and a "Key Word" 
Search is provided which can be output to the Screen 
or Printer. 

TAPE DATE-tV&ASE CALENDAR 
(Each Tape File will hold op to 400 4ms] $26.95 

dm DATB-CVBASE CALOJDAS 
(4.000 Hbiui at 300/ftcnth per ask) $19.95 



Coapvter ,f%et— consultant* 

ThaiLA RASA , 

TABULA RASA is similar to 0£3nOP/PLAN and provides 
for the generation and maintenance of tabular 
computation schemes often used for analysis of 
businees. sales, and econonic acw^ru*. Its menu* 
driven user interface provides these C ApaM litiea even 
to those users with no progranming experience. Its 
extensive report-generation capabilities allow the 
user to generate professional results with mmi/msn 
effort. It require* TSTe Cstasxkd BASIC. 

F and CCF - $180.00. U - $200.00 



O&a&LC 
TBI Electronic Spread Sheet for 6G09 Computer 
System*. An extremely PCWDlFVL Business TOol, this 
Program will find an unlimited nujnber of "non- 
business" applications, also (for example, a Full 
Junior College Electronics Curriculum was set up 
using OTMACAXC) , Advanced fsstures like Table 
Lookup" make Income Tax work easy: Column or Row 
Sorting for numerous applications: etc. Completely 
"HeirOtY Resident", fechlne Language, this Program is 
FAST. Provides STANDARD FLEX Text Pile Output for 
use with BASIC, word Processors. Pascal. tT. etc 
Also available for Data-Corap and FHL FLEX systems 
using the 50 x 24 EfcspLjyi. 

F and 67K3AL OCT ~ $200.00 
U - 5395.00 



FULL I 

This psekag* supports any Serial Terminal with cursor 
control of hemory-^lapped video Display*. The package 
substantially extends the screen Input/Output 
capabilities of TBC'a Extended BASIC programs by 
providing a simple, table-driven method of describing 
and using full screen displays. These table entries 
are easy to aet up and maintain, and are norsnlly 
stored on disk snd read as rsquired. A simple, 
interactive mesne of generating the form* and the 
data field definition* is provided. 

F and OCT - $54.09, U - $75.0* 



Consultant* 
IUX 00001 PPULZE LQ7T 

The Full Screen teuling List System provides a raaana 
of maintaining eunple mailing Liets. Using a randan 
fill structure bssed on the flret character of the 
name field, it maintains the file in alphabetical 
order for easier inquiry. With the TOD axsrend. the 
user may locate all records matching on partial or 
complete nam*, city, stete. tip, or attributes. 
Printed listings snd output to labels may also be 
produced on the same selective basis. It requires 



F and OCT 



S 110.1 



S3 [c© 




"FLEX is s trademark of TechmcsJ Sy»i*m»i Consultants 
"OS9 ts * usdemark of Microwtrs 



I soo^ns ssoo 

*sk%%«» c r. 
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Availability 

F « FLEX* OCT - Color Computer F1£X 

O » 06-9, ODD • Color Computer OB-*" 

- onlFizx 

CTD ■ Color Computer Disk 

OCT - Color Computer Tape 
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Interest** in IBUJOUl (the ***** Kind)? An DCITOID 
BASIC Program that will help you deal with numeroua 
problem* requiring interest calculations. Present 
Valoa. Rata of Return* Currant Bond Yield arid Rata of 
Raturn to maturity, Loan Repayment Amortisation 
Schedule*, ate. 

TAPE - S29.95 



mm own m*mn 64* 



ttxxtnsssrlis)! Inc* 



DISK EXTENPeD BASIC Accounting Program w/ *ech. 
tang. Routines. A "Traditional" accounting Parage 
for Small Buainaaa, Clubs, Churchee, Personal Uaa. 
ate . Up to four lavale of aubtotala with Trial 
Balance* tnoaos Statement. <*nd Balance Sheet ftepor^*. 
DOC allows up to 900 Account* and a Trial Balanoa of 
$9,999,999.99. Tranaactiooa «n»y ba up to 14 Una 
long, and coronanta find applanations may ba fraaly 
uaad. Accounta ara tracaabla to tha journal 
transaction, which rnay lncluda conrventa. Scraan 
report* allow review of paat tranaat^iorva and current 
balances. 

DISK - $44.95 



-- Multi-Ueer. Multi-Tasking with FLO — 
Southeast Madia ie now shipping DYTJASHARE HO* 
- tha multi-uaar. multi-tasking capability of 
DT1CA8BAAE allowa FLEX uaara tha advantages of snore 
aophlaticatetl and time saving czx^^tar uaage without 
having to buy or laarn a new Larsjuag* or Operating 
System syntax. C7DA8HAV, at lta name 1/rplies* allowa 
true "tlme-eharing" operation under tha pc^ulax FL©C 
oparating system, and alao allowa each uaer to ruj> 
two almultaneDua joba (raul ti-t asking b even on single - 
uaar syatems. For exevmpler wlale in EDIT. >ou can 
Hat another file or examine e directory. Or, you 
■sight look up an item in a teta Bate while a Sort la 
in progreeel DTHASHAAE also provides soro Cringe 
benefita that will be greatly appreciated by FLEX 
users, including type-*hsadf operand Una acting, and 
instant rnpiiM to "escape". 

OTkASlkAMZ it the pamleee method I Use your 
existing Flex computer by minjpty adding 64K of RAH for 
each uaer end/or teak. Fact is, you etui uaa FLOi 
juat like >ou always havej OlAOtfc is not intended 
a a competition to UniFltX. It doaa not unprwaj on 
the epeed of FLEX, and doea not offer peeeword 
protection or other nlcetiee of a rull-bl£*rt multi- 
ueer system. What DTVASBAAB oxxaa do is give FLDC 
uaare a toe rraiT w«y to uaa existing a tftara in a 
anil tl- user, mul ti-t a a king enrlroAasmt, eo your 
existing FLOC vereiona of BASIC, XBASIC, editors, 
sssemblers* diaaeeemhlero, aort/maroa packages, won! 
proceatora. catpilara, OYNACAIiT spread-eheet package, 
and eo on are at 311 good. 

faTT* — The initial release of DVNVKART. is tor 
SWTPC S/09 Computera. but veraiona will alao be 
available for other popular extendedHixsim y (up to 
UD4JQ systems* auch as HELIX and GIKZX. A minimum of 
129K of RAM will be required with ALL veraiona, 
0TKASBA1Z requlrea SAX of RAH tor s*oh act^e) taaav 
thua a 2S8t eyetem OTuld allca* foce«jn>r«i-fcau^jraund 
operation on two termlnala. or foreground -only 
operation on four terminals. 

AVAXLAHLB BOM from ataaxJaaa** NadU - SJBV.BV 



QUALITY I 

FLEX - UTUTLEX - OB/9 



For the paat several months, we at tha 
NaxlU OtodaJon Of OEaaput aa- P4 taMsMng> Km?. (CFD, the 
parent company of **8* HEX) Jrxajagax, and COLA NDD 
JOOMLAL* have debated expanding our softwsrs 
dlatrlbutlon buainaea. Many other raeganne* have 
bean doing eo for yeara (in fact. MOST were in the 



X TOLL Mil 

1-800 



338-6800 /m 

% fft.Bl* 

5900 Cassandra Smith Rd. 
HUson. IN 37343 

for Information 
CAM (615) 642-4601 

CoCo OS-9'" FLIX" 

SOFTWARE 



Software Distribution ^ainase QCFTavT they began to 
publlah a Nagatlne). Pr«ent*y there are many fine 
exaaplea of aofewaxe that has bean developed by yrju, 
our readera. that will never eea the "light of day" 
due to the Goat of Adtaartlalxsj and TWE and Cbat 
involvmd in tha pxxsaartlon. dl^trHaitlon^ and Qsnaaar 
BUFTCaTT of that aofewaxe unlama SKETHE. with enough 
exposure and the willingnvaa to continually edumr tia» , 
rune with that ball. 

Software la tha "bacXbone" for the REAL 
utllltatloti of any computer Systaww and ours are no 
exception I This has been no alapie dadslort. While 
we realise that there could be aorae conflict with 
a<sna of our edvertlaera, we ALSO heer a LOUD and 
CarOThKJUS cry for SELF fro* our Readera. Firm day 
one. the toreaxoat ooncsum of *68* KICK) JTUPjCAL haa 
been lt'e AZADKBE1 Therefore, our aXVthaxaet laatli 
Olvlelon will accept, for appraiaal for poaalble 
Dletrlbutlon. 6809 aoftware; Gamea. Utilltlea. 
Software Oevelopr^it, Businesa Application FtrsEjrama^ 
ate. 

In the paat there haa been too aoch eoftwere 
offered that waa not quite ready. Ma will etnve to 
elininate that elaiasnt. But. ri^ht up front, wa tall 
you only that we will do our vary beat* noOtinz nore. 
Aleo. we will etrlve to keep ooat to e bare nani/miry, 
while aaxruring far the author e felr return in roj^lty 
peymente. promptly paid, and in cuatoisir support for 
Ms product. 

Of course. *— will expect, no — mwaTl, that the 
author keep the product free of errors (bugs), ^n^ 
maintain it in a prompt end buainaaa like manner. 
Alao we ehell require thet autltora be willing to 
furniah 'eource* for thoee programs that justify, by 
price end utility, inclusion of aame. The lack of 
eource code, properly covnented. le e continual 
cqmpialnt we hear. Not all programs will be aold 
with aouroa* but *4*re nacamaary, we will insist that 
it be included. 

In some instances the program *nay be email or 
ehort and not juetlfy itaelf ^9 a H elngle H aala 
product. In thla event it will be combined with 
other like programs, and offered aa a packaxje. In 
that event, the royaltlaa wiJl be aplit baCwean the 
varlnus suthnre . 

If you have aoftware that you feel will qualify 
under this program please contact one of the f*Kple 
below. Reiflcrdber. if your software has any problem 
or "funniaa" — OFT IT STVAKBT BOB YOU CTaTWCT 
OBI I Also get your sourts asde in proper shape and 
well i iiiasinted; there la too 9uO\ 99% oode already 
drifting around. 

If your software is OBMTf contacti 
Bob aaV. Don wniiarmi, or Tern WUliams 

ataathaaxn »axtU la a diviaicn 

of OEssButar AubUabJaxj. Ibc. (CPD. 

a fismly of 1001 6&0C »^PFort oadlltlae 




*FLEK is a tredemaA ol Tachnesi Sysiams Consudams 
*OS9 « a irsdemsdi ol AAcrowaca 




equability 
t - FLO* OCT - Color Oaxputer FLDc 
O » 0B-9, CCD - Color Coaster 06-9 
- unjrtCX 

OCS • Color Computer Mak 
Color Computer Tape 



OCT 
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CALENDAR -CLOCK f TtHElt / FaXaLLIL POST 




C«l«oder - Clock 

* all • lick tot 1 1 



:■■ l«ri«llt «»m*«lla4 
I»tt«4l4> • »« •(■ flint «M4»1« ► •«• 

|%>*aa/»aar, l«.r all ••« tlfJJt *f 



Incervel Tl**r 



• la* atl&iat «P«i»««. tiltr.ittkttl, 

• fiaaalttli atca *»-•♦♦ aaa r(. r );** 
9 dlvl •».♦ 1**141 *<1» Ctfta.t • *»• ai 

• Catarafa tt.li u.ii.ili Ir.a 1< 



Parallel t/0 Port -- Nttf *.rri T »< i 141 ,.-.,.., ■ * 



Caniirvctlon -- »-ii» ..-*.'. j .,.j.r i. 1 . 

Manuel *- Wall decu»ent»4 - 16 MM* 



AiH.Mtd *n<$ ceated S119-95 Kit $89,91 

Golcplated bue conn 7. SO ? HHi option 1 . 10 

01 ik 5 or 3 in. SS* or Fle*« 0S.9 Available NOW 1 4. ft) 



KOIIRTSOU CLCCTROKICS 
1003 "Jim Send* Dr. SF. 

Aib^ u tr, u . ( JJM 1/12) 



•hoee (101) 244-0029 

HH reeldtnte add it tn 

Add $) Shipping 4 KandUnt 



/? 



our EPROM PROGRAMMER with the field. 

Ail data taken direxrtly cro» tnanufaartttfttr'e current advwctUing . software. 
intcrlmxm, <v pB/aakaiity kxSiIm My aleo 1m mjulred at. adtjltfoctsl coat. 



> r* pie voitege nrucw 

> Supplied in Kit fot» 



INTELLIGENT 



2704* 

2506 

2708- 

2756 

2516 

2716 

2716- 

2S32 

2732 

2732A 

25 4 

2764 

2526 

27126 

2616 

66764 

6746 

6749 



TOTAL 



PRICE 



$125 



PAR 


PAR 


SER 


S30 


SER 


SER 


NO 


NO 


YES 


NO 


V€S 


YES 


• 
• 
• 


• 
• 


• 

• 
• 
• 

• 
• 




• 

• 
• 


• 

• 
• 

• 
• 
• 
• 
• 
• 
• 

• 


3 


12 


6 


11 


11 


11 


S45« 


$169 


S2B9 


1375 


$489 


$575 



ITfWH CT&QM rrr^Tvwvn SI 25. ttrrarfnellCy (trrtole far 2SOB, TKB. 2516, end 
2Jl* Included. Specify 0*1. di*fc a U*. &*a <7f>«r«tLng eyeceei (ISC' a *L» or 
saVe DCS) v»«e« ordering. Manuel only. 31 Ol rof\odabie wtth KWW ftireheeo. 

UNITEK - P.O. Box 671 « Emporia, VA 23847 



, . . only from 
LSI 




449.95 



Were mighty proud ol our new processor Card We're 
gh/rng you (Its abHity 10 qo 66000 without major 
charsjss lo your system 0v» nmw CPU gr*aa yoo ir»ese 
advanced features 

■ Oynerruc PSrtrtOnkng memory management unit 
wdh bound check regisler 

■ Onboard timer lor multluaer/mulLMashtng 
applications 

■ Onboard bootstrap EPROM and Monitor 
EPROM space 

- Vectored pno/riy mremwpt generator 
• On-boa*d wan iiaie generaior 

- User selectable bus options tnat includes a new 
higher bend*ndih bus mode 

And many more 
S66K/08 CRUASSEM 6 TESTED 549 95 

S66K/06 CPU MT FORM 449 95 

(KIT INCLUDES PROCESSOR. CRYSTAL 
SOCKETS ANO,CONNECTORS> 
DISK CONTROLLER SUPPORTED DC3, 0C4. 
OMF2, SOC6 



KIT 



Announcing . . . 
THE SHELL FOR FLEX 9'"* 

We are pleased to announce (to $H£U, a 
UNIX + + hKvsn«<niujtsupporTe|/0 edirecnan, 
pipes, macro suOatltulion and pruitammabte 
shell scripis) The she* wit work wrlh all your ex- 
ksltng programs and utalruee Requires 56K of 
user ram. FLEX 4T' version 2.6 and above The 
snail occupies me top 8K ol user ram An ex- 
cellent loo) for Ihe 8809 earn/nun ly 



FLX/SHO^e B inch version 9000 

FLXfSH09-5 5.25 inch version 90 00 
ONE YEAR MAINTENANCE 22,50 



LSI STANDS BEHIND ITS PRODUCTS 

1 YEAR UWTED WARRANTY 

ON ALL OUR PRODUCTS 



ANNOUNCING THE LSI 66000 USERS GROUP 

Join the Group by sending us your name and address. You wiW receive our monthly publication 
wrth free public domain user programs and software updates 

New members of the users group will receive a $30 00 discount on THEIR FIRST LSI hardware 
purchase Anyone that donates a program to the group will receive ou* current user group software 
on a formatted CP/M readable disk 



2S6K RAMCARD 

Ua^iheJafesilSiiattwo*ooymt»2S6K RAM CARD 
makes a parted eddruon 10 your S68K system Uses 
MROY for refresh arbttrafcon 

SAAA/TBVHAX $7*0.00 



ANYC 



SRECtlVtD ON SDCS OR THE JSoK RAM CARD BEFORE 40*4 WILL RECtrVE A ISO OlSCOUNT 



IOCS OONTROtLER 

A SS60 OMA disk conuofler (Or uae wiflh either 
66000 bus rr*?de» or 6608 bus modes Features a 
hboft retiaOtliry digital dale sepesalor (No enelOQ 
circuits lo drift) and luH 1 Meoaftyte Addressing 



QAatLu-V-SflC-WlSBO 00 



ORfa famous CPrM mids lor [he 66000 it includes 
a C compMer. retocauMa e»*emt4ef , linking loader, 
librarian and many utilise It 11 source compaiibie 
wrm all other CP/M operaiing flystems 

CP1SeAA> ., W5O.00 



NY residents add sales tax 





and COO accepted 



'f LEX r" <• a Uasamefk of Technical System 
tCPyuaax * ■ .igniefid irade^ark el Otejii 



• UtriX it a regoteted ireSemi/k ol Sefl Lata 
11 .TOSS an« eltmt *>*N^i to chanoe wtihoul nana 



LSI Enterprises Ltd. 

PO Box 1227 

Woodhaven, NY 11421 

(212)423-5596 
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TEN MOST-ASKED QUESTIONS 

>•>«.. DYHACALC 

THE ELECTRONIC SPREAD-SHEET FOR 6809 COMPUTERS 



1. What is an electronic spread-sheet, anyway? 
Business people use spread-sheets to organize 
columns and rows of figures, oynacalc simulates 
the operation of a spread-sheet without the mess 
of paper and pencil. Of course, corrections and 
changes are a snap. Changing any entered value 
causes the whole spread-sheet to be re calculated 
based on the new constants. This means that you 
can play, what If?' to your hearts content. 

2. is dynacalc Just for accountants, then? 

Not at all. dynacalc can be used for lust about any 
type of job. Not only numbers, but alphanumeric 
messages can be handled. Engineers and other 
technical users will love dynacalc s sixteen-digit 
math and built-in scientific functions. You can build 
worksheets as large as 256 columns or 2S6 rows. 
There s even a built-in sort command, so you can 
use dynacalc to manage small data bases — up to 
2S6 records. 

S. What win dynacalc do for me? 
That's a good question. Basically the answer is that 
DYNACALC will let your computer do Just about 
anything you can imagine. Ask your friends who 
have visiCaic 1 * or a similar program, just how 
useful an electronicspread-sheet program can be 
for all types of household, business, engineering, 
and scientific applications. TYplcal uses include 
financial planning and budgeting, sales records, 
bills of material, depreciation schedules, student 
grade records, job costing, income tax preparation, 
checkbook balancing, parts inventories, and payroll. 
But there ts no limit to what YOU can do with 
DYNACALC 

4. oo I have to learn computer programming? 
noi dynacalc Is designed to be used by non- 
programmers, but even a Ph.D. in computer 
Science can understand it Even experienced 
programmers can get jobs done many times 
faster with dynacalc. compared to conventional 
programming. Built-in HELP messages are provided 
for quick reference to operating instructions. 

5. do I have to modify my system to use dynacalc? 
Nope. DYNACALC uses any standard 6809 config- 
uration, so you don't have to spend money on 
another CPU board or waste time learning another 
operating system. 

Order your DYNACALC today! 



Foreign Dealers: 

Australia & southeast Asia; order from Paris Radio Elec- 
tronics. 161 Bunnerong Road IPO Box 380) Klngsford. 
2032 NSW Australia. Telephone: 02-344-911 1. 

united Kingdom: order from Compusense. Ltd., po 
box 169. London N13 4HT. Telephone: 01*882-0681. 

Scandinavia: order from Swedish Electronics hk AB, 
Murargatan 23-2S, Uppsala S-7S4 37 Sweden Tele- 
phone: 18-2S-30-00. 



6. Will dynacalc read my existing data files? 
You betl dynacalc has a beautifully simple 
method of reading and writing data files, so you 
can communicate both ways with other programs 
on your system, such as the Text Editor. Text 
Processor, sort /Merge, stylograph™ word 
processor, rms™ data base system, or other 
programs written in BASIC. C. PASCAL, FORTRAN, and 
so on. 

7. HOW fast iS DYNACALC? 

very. Except for a few seldom-used commands. 
dynacalc is memory-resident, so there is little disk 
I/O to slow things down. The whole data array 
(worksheet) Is In memory, so access to any point is 
instantaneous, dynacalc is 100% 6809 machine 
code for blistering speed. 

9. is there a version of dynacalc for my system? 
probably, you need a 6809 computer 132k 
minimum) with FLEX™. UniFLEX™. or 0S-9 tM 
operating system, you also need a decent crt 
terminal, one with at least 80 characters per line, 
and direct cursor addressing. If your terminal isn t 
smart enough for DYNACALC. you probably need a 
new one anyway. The UniFLEX and OS-9 versions of 
DYNACALC allow you to mix different brands of 
terminal on the same system. There's also a special 
version of DYNACALC for color computers equipped 
with FLEX (Frank Hogg or Data Comp versions). 

9. how much does dynacalc cost? 
The FLEX versions are Just S200 per copy: UniFLEX 
version S39S: OS-9 version (works with LEVEL ONE or 
level TWO) S2S0. Orders outside North America add 
S7 per copy for postage, we encourage dealers to 
handle dynacalc. since Its a product that sells 
instantly upon demonstration. Call or write on your 
company letterhead for more information. 

10. where do I order dynacalc? 

see your local dynacalc dealer or order directly 
from CSC at the address below, we accept 
telephone orders from 10 am to 6 pm. Monday 
through Friday. Call us at 314-S76-S020. Your VISA or 
MasterCard is welcome. Please specify diskette si2e 
for flex or OS-9 versions. Software serial number is 
required for the UniFLEX version. 



Computer Systems Center 

13461 Olive Blvd. 

Chesterfield, mo 63017 

(314) 576-5020 



% 



UniFLEX software prices include maintenance for 

the first year, 

dynacalc Is a trademark of 

computer Systems center 

vtsicitc H a cnDemart of vhjcooj 

stylograph ■* » trademark of Great Piiim Computer Co 

RMS It a trademark Of wamington computer Servfcw, 

FLtx and urtiFLEX art trademark* of tsc 

OS-9 it a trademark of Mtcroware and Motorola. 
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DYNAMITE* 



THE CODE BUSTER" 

disassembles any 6809 or 6800 
machine code program Into beautiful source 

• learn to program like Che experts! 

• Adapt existing programs to your needs! 

• Convert your 6800 programs to 6809* 

• Automatic label generation, 

• Allows specifying fcb s, FCCs. fob s, etc 

• Constants input from Disk or CONSOLE. 

• Automatically uses system variaoie names 

• output to console, printer, or disk file. 

• Available for all popular 6809 operating systems. 

FLEX™ S100 per copy; specify 5* or 8 diskette 
os-9™ S150 per copy; specify S or 8* diskette 
unlFlEX™ $300 per copy, 8* diskette only. 

For a free sample disassembly that'll convince 
you DYNAMITE + is the world s best disassembler, 
send us your name, address, and the name of 
your operating system. 

Order your DYNAMITE + today! 

See your local DYNAMITE + dealer, or order di- 
rectly from CSC at the address below, we accept 
telephone orders from 10 am to 6 pm, Monday 
through Friday. Call us at 314-576-5020. Your VISA 
or MasterCard is welcome. Orders outside North 
America add $5 per copy. Please specify diskette 
size for FLEX or OS-9 versions. 

Foreign Dealers: 

Australia & Southeast Asia: order from Paris 

Radio Electronics, 161 Bunnerong Road <PO Box 

380) Kingsford, 2032 NSW Australia. Telephone: 

02-344-9111. 

United Kingdom: order from Compusense, Ltd., 

PO Box 169. London N13 4HT. Telephone: 

01-882-0681. 

Scandinavia: order from Swedish Electronics hk 

ab, Murargatan 23-25, uppsala 5 7S4 37 Sweden. 

Telephone: 18-25-3OO0. 



computer Systems center 

13461 Olive Blvd. 

Chesterfield, MO 6301 7 

<314) 576-5020 



% 



UnlFLEX software prices include maintenance 

for the first year. 

dynamite + is a trademark of Computer Systems Center. 

FUUjno urofLfx ttt cr*dm*v<tf TX. 
OS-9 H j cr jotnurt of waowdfw and Motorola 

Dealer Inquiries welcome. 
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<£ The only ALL 6800 Computer Magazine. 
if More 6800 material than all the others com- 
bined: MAGAZINE COMPARISON 
(2 yeen) 
Monthly Average* 

6800 Articles TOTAL 

KB BYTE CC DOBB'S ' PAGES 

7.8 6.4 2.7 2.2 19.1 ea. mo. 

Average cost for all four each month: $e.5d 
(Based on advertised 1-year subscription price) 

68 cost per month $2.04 

Thai's Right' Much. Much More 

for About 

1/3 the Cost' 

OK. PLEASE ENTER MY SUBSCRIPTION 

Bill My: Master Charge □ — VISA □ 

Card it Exp. Oate 



For □ 1-Year □ 2 Years □ 3 Years 
Enclosed: $ 



Name- 



Street 

City 



State. 



-2ip- 



My Computer !$:_ 



66 met o Journal 

8000 GtMindra Smdtft Rd. 

HlMton, TN 37343 



SUBSCRIPTION RATES 

USA 
1 Year S24,50, 2 Year S42.50, 3 Year $64.50 

•FOREIGN SURFACE Add S 12.00 per Year to USA Price 

•FOREIGN AIRMAIL Add S36.00 per Year to USA PrTce 

••CANADA & J4EX100 Add S5.50 per Year to USA Price 
Cash (USA) or drawn on a USA BankM! 




^M^^a 
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THE 6809 "UNIBOARD"™ 

SINGLE BOARD COMPUTER KIT 

PERFECT FOR COLLEGES, OEMS, INDUSTRIAL 
AND SCIENTIFIC USES! 

64K RAM! DOUBLE DENSITY 
FLOPPY DISK CONTROLLER! 



*to 



BLANK PC BOARD 

$9995 

WITH PALS, AND 
TWO EPROMS. 



FOR 5 1/4 OR S INCH 

SOURCE DISKETTE 

ADD $10. 




*399 



00 



COMPLETE KIT! 
FULLY SOCKETED. 



ALL OPTIONS ARE 
STANDARD. NO 
EXTRAS TO BUYI 



<ui 

o> u 

00 

13 

S8 

CD m 

Is 

uj 5 

3* 



<i 



THE COMPACTA UNIBOARD™: Through special arrangement with COMPACTA INC., we are 
proud to have been selected the exclusive U.S. Mfg.of their new 6809 UNIBOARD™ COMPUTER 
KIT. Many software professionals feel that the 6809 features probably the most powerful 
Instruction set available today on ANY 8 bit micro. Now, at last, all of that Immense computing 
power Is available at a truly unbelievably low price. 



YOUR CHOICE OF POPULAR 
DISK OPERATING SYSTEMS: 

FLEX™ from TSC $149 

OS9" from Mlcroware $199 

Specify 5-1/4 or 8 Inch 



FEATURES: 

* 64K RAM using 4116 RAMS. 

* 6809E Motorola CPU. 

* Double Density Floppy Disk Controller 
for either 5-1/4 or 8 inch drives. Uses WD1793. 

* On board 80 x 24 video for a low cost console. 
Uses 2716 Char. Gen. Programmable Formats. 
Uses 6845 CRT Controller. 

* ASCII keyboard parallel input interface. (6522) 

* Serial I/O (6551) for RS232C or 20 MA loop. 

* Centronics compatible parallel printer interface. 
(6522) 

* Buss expansion Interface with DMA channel. 
(6844) 

* Dual timer for real time clock application. 

* Powerful on board system monitor (2732). 

Features commands such as Go To, Alter, Fill, Move, Display, or Test Memory. Also Read 
and Write Sectors. Boot Normal, Unknown, and General Flex 1 ". 



PC BOARD IS 

DOUBLE SIDED, PLATED THRU 

SOLDER MASKED, 11 X 11-1/2 IN. 



Digital Research Computers 

** (OF TEXAS) 

P.O. BOX 461565 . GARLAND, TEXAS 75046 • (214)271-3536 



TERMS: Shipments will be made approximately 3 lo 6 weeks after we 
receive your order. VISA. MC, cash accepted Add $4.00 shipping. 
USA AND CANADA ONLY 
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64K SS-50 STATIC RAM 




BLANK PC BOARD 

WITH DOCUMENTATION 

$52 



SUPPORT ICs + CAPS - $18.00 
FULL SOCKET SET - $15,00 



ASSEMBLED AND TESTED ADD $50 
FEATURES: 

• Uses new 2K x 8 (TMM 2016 or HM 6116) RAMs, 

• Fully supports Extended Addressing. 

• 64K draws only approximately 500 MA, 



56K 
64K 



$219 
$249 



200 NS RAMs are standard, (TOSHIBA makes TMM 2016s as fast as 100 NS. FOR 

YOUR HIGH SPEED APPLICATIONS.) 

Board is configured as 3-1 6K blocks and 8-2K blocks (wi hin any 64K block) 

for maximum flexibility. 

2716 EPROMs may be installed anywhere on Board. 

Top 16K may be disabled in 2K blocks to avoid any I/O conflicts. 

One Board supports both RAM and EPROM. 

RAM supports 2MHZ operation at no extra charge! 

Board may be partially populated in 16K increments 

16K STATIC RAMS? 



CLOSE OUT SPECIAL 

WE HAVE DROPPED OUR 32K 88-60 STATIC 
RAM BOARD WHICH USED 2114 LOW POWER 
RAMS. WE WILL SELL THE REMAINING 
STOCK OF BIANK PCB'S WITH DATA FOR 
$17.50 EA. THESE FORMERLY SOLD FOR ISO. 



r 



The new 2K x 8. 24 PIN. static RAMs are the next generation of high density, high 
speed, low power. RAMs, Pioneered by such companies as HITACHI and 
TOSHIBA, and soon to be second sourced by most major U.S. manufacturers, 
these ultra low power parts, feature 2716 compatible pin out. Thus fully 
interchangeable ROM/RAM boards are at last a reality, and you get BLINDING 
speed and LOW power thrown in for virtually nothing 



Digital Research Computers 

** (OF TEXAS) 

P.O. BOX 401 565 » GARLAND, TEXAS 75040 ♦ (214)2710538 



TERMS: Add $2 00 postage We pay balance Order under $15 add 75c 
handling No COO We accept Visa and MastefCtiarge Tex Res add 5% 
Tax Foreign orders (except Canada) add 20% P & H Orders over SM. add 
6SC iot insurance 
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Announcing. . . 
THE SHELL FOR FLEX 9'" 

We are pleased to announce the SHELL, a 
UNIX™ like shell that supports I/O redirection, 
pipes, macro substitution and programmable 
shell scripts! The shell will work with all your 
existing programs and utilities. Requires 56K of 
user ram. FLEX 9™ version 2.6 and above. The 
shell occupies the top 6K of user ram. An excell- 
ent tool for the 6609 community. 

FLX/SH09-8. . .8 inch version 9000 

FLX/SH09-5, . .5.25 inch version . . . 90. 00 
ONE YEAR MAINTENANCE 22.50 

UNIX is a trademark of Bell Labs'* 

FLEX 9" is a trademark of Technical Systems Consultants Inc. 

All prices subject to change without notice. 




LSI Enterprises Ltd. 

PO Box 1227 

Woodhaven, NY 11421 

(212) 423-5596 



MACROPLEX Software 

175 Fifth Avenue. Suite 3011, New York, NY 10010 



Presenting.,. THE CONDUIT 

A new File Type for OS9 

THE CONDUlf lets progiams exchange data wnhoui usfng external 
fries, Dtrect program toprogram data transfers on any patn use OS9 
I/O calls. No need to cringe devicewndependent programs Two-way 
transfers are permitted and device-dependent code can be accom- 
modated Progiams that formerly tan sequentially can now run con. 
currently to the Amu of memoiy 

Utilities supplied v\mh THE CONDUIT give immedrate lesults when 
linked to your current progiams via CONDUIT pachs 

• Fast disk sipre<KAvn speeds tip awemWiw and (xner I/O bound pvoceduTes 

• 'In.flighrterrTiinaJ I/O redaction te g sel iraps m DEBUG from a di$K filej 

• Basx09 souite inclusions, enhanced Jesting 

• "Null files" dram output itgnni EOf on input 

free brochure available Wire, or call (212) 686 3036 



CONDUff Mt lyutm • uUftn 
taug? outvdt? Norm Arrtcnc* «*w 



* 8 
S S 



Speeds' o»a*(Mi 

\**VOn tot Oil LJhrfN Inn av^UMr icon 

OS*.* Saw 0*.* M^row** Vyurrm Corp & Movot^ N 



XDMS 

Data Management System 

((►ISM-AY] / INPUT p> UTILITIES ^> OUTPUT / PRINT J 

IfNTflTrp 



f PAQIMQ /-*— ^VIRTUAL /* 

\ file r^-^yMEMonv #"^ 



} iMTWY p^ 





^nrx 



( 0, *^* ¥ J (oUTPUtC /cOMMANrf 




System Architecture 



WE8TCHEBTE 



J* Applied Builnan Byiti 

Post Of'lct loi l»7 
rlaccUff Manor, *.Y. *MI0 



Th» rC'HS n»H Min*g»m*nl Syllpm I* ivllliblf tft «hr»» l*v*la. f*Cr* 

level includes I ha XDKS nucl*ue, VMGEX utility and Systam Documentation 
for level III. IDMB is on* of th« moil powerful systems available for 
6*0* computers and may be used for a «ld* variety of applications, XDMg 
i/tiri *r* registered in our database to permit (in tribution of product 
announcement* And validation of user upgrade* and maintenance requests* 

IDM6 Laval I consist* of DCFJUf, UPDATE and REPORT facilities 
TMi loval 1* intended at an "entry level* system* and Ptrmlti entry and 
reporting of data on a 'tabular* bast*. The BBPORt facility *upport» 
record and field selection, field merge* sorting, lina calculations , 
column total* and report titling. Control la via a English-like language 
Mtucn. f* upward compatible with level IK XDKS Level I .... . *12*.*3 

XDMS Litvel II 

Lava) IX add* to Level 1 tn* powerful OEstERATE facility. This facility 
can be thought of n a general file processor vWch can produce report*, 
form* and form latter* a* well a* fit* output wMch may b* re-input to 
th* facility. OEKERATE may be used in cample* proceating application* 
and i* controlled by a Ertgllaft-ltfc* command l*ngu*g* whlctt tncompmn 
that otttl by L*v*l I. XDMfl Level II .... , . ,*l»*.tS 

XPMB Leavl III 

Level III includes all of l*v*l It plus a set of useful DK8 Utilities, 
The** utilities are designed to aid In trie development anil meintenanc* 
of user applications and permit modification of IONS *y*l» parameters, 
input and output of IDKV riles, display and edification of file format, 
graphic display of numerical data and other functions. Leval 111 1* 
intended for advanced XDMS ueef*. XDKS Level III ....... . «?*t.tS 

XDKS System Documentation only <*)0. credit toward purcnasel. . .* ?*.9J 

XACC T Accounting Gvmtmrr, 

Th* tACC G*n*r*| Jiccouoting lyitsn la d**ign*d for small business 
environments of up to 10,000 account* and inventory Htm*. Th* lyitim 
in t*s.raf ■• accounting functions and inventory fllus th* general l*dg*v, 
account* r*C*lv*bl* and payable function* normally told taparataly |n 
Olh*r ( r tttmi. Featuras user daflned accounts* product* (or t*rvlc*th P 

transactions^ invoicing, ate, E**tly configured to mc-tt environment i. 

XACC G*n«rtl Account »n B System tHequlres XDMS, pt*r. Lv. I III. . 11****3 

tkCC System □ acuifi* ft t a 1 1 nn only ttlO. credit tOwartf purchat*), , .1 2*,*3 



WEBTCHE6TBR d*>pplia*cJ Bualna** Byatam* 
P**t Dffic* 8o« )i?, irlarcliff Manor, I.T. J03J0 

All aoftaar*) li nrltt«3n In mftcra/a*ae-t»air end run* undw 6809 PL6* 0/S. 
T«m»: Owjcpi, HOfW OrdJar, Visa <T H*gt*)rc>i>rna>« Shlpnwnt flrit cl«ss< 
AtfdPtN S2.50 {17.10 rorajign). rcY R«* odrJ tsM taw. Sfrtclfy 5* or B". 

Solas: S. C. MEDIA. l-«X>-5*»~«*)00, Consultation: 914-941-3592 (*vs)n»1. 

FLEX Is o trodtmarii d Tectmical Syitccas Consultants, Inv 
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Gives your application a head start 



Save time and money in the develop- 
ment of your product or system by 
using AMX, the software executive 
with proven, fault-free operalion. 

SIMPLE OPERATION 

You divide complex control pro- 
grams inlo a number of separate, 
more manageable programs, called 
tasks, each designed to do one job. 
This allows tasks to be written and 
tested separately and then combined 
to form a reliable, finished system. 

AMX supervises the orderly execu- 
tion of these tasks, assunng that the 
mosl important jobs always get done 
first. Tasks appear lo be executing 
simultaneously. It's almost like having 
a separate CPU lor each lask! 

HARDWARE INDEPENDENCE 

AMX does nol require a paiticular 
hardware configuration. You control 
your environment. You pick the I/O 
method. You decide the preferred in- 
terrupt service technique for your sys- 
tem. AMX will support you on the 
microprocessor of your choice. 



AMX isfast.compact.and ROMabte. 
1 he AMX nucleus, less than 1400 bytes 
in si2e, features multiple task priorities, 
intertask message passing with prior- 
ity queuing, external event synchroni- 
zation, and interval timing. 

Support modules provide extended 
memoiy management, buffer control 
and resource allocation. Fast, re- 
entrant mtegerand lloating point math 
libranes are also available. 
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AMI <s « t»6O0ni«k or KAD*K Ptoducl* ltd 
CP/M ts a tradvrnwk of 0«Q«aJ Ro«rch Corp 
280 «s » rrad«m»ii of Z#>Q Corp 



AMX interfaces support programs 
wnllen in C, PASCAL, Ft/M. FORTRAN 
and assembler: 

Access to CP/M ? disk files in real 
time is possible using the AMX I/O 
Supervisor 

COMPLETE DOCUMENTATION 

We deliver AMX source on diskette 
to permit AMX to be moved to the soft- 
ware development system of your 
choice. Our liberal license agreement 
permits binary (object) distribution 
without royalties. 

HOW TO ORDER 

A specification sheet and price list 
are available, free. Your check or 
money order for $75 will purchase the 
AMX Reference Manual for immediate 
evaluation (specify 8080. Z60, 8086 
or 6809 processor). Add $25 for post- 
age and handling outside USA and 
Canada The standard 8080/Z80 AMX 
Multitasking Execulrve package, in- 
cluding source code, is $800. Sup- 
port modules and interfaces are avail- 
able separately 

AMX is the choice of professionals 
the world over. Make it yours, today. 



IF 



KADAK Products Ltd. 



« 



206-1847 W. Broadway Ave., Vancouver, B.C., Canada V6J 1 Y5/Phone: (604) 734-2796 Telex: 04-55670 
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AM -loo 714 ADVANCED WINCHESTER 
Subsystems forFlEJTand OS -9™ 

COMPLETE* AM -tOO starting as low as S18 9 9.- 




— complete subsystems 

SMBFIHED— STD. 5* - S1B99.- 

WM8 FIXEO — STft 5" - S2099.— 

*MB FlXEO — MINI 5" - S2315.— 

5 MB REMOVABLE- MINI *" - S2395.— 






• [ndatura * All Cillti * Haat 

* MMmfi Mv.ri «D HIDDEN El THAI III 



-options 



SS-50MOST INTERFACE *nCI. SOFTWARE ORIVERS SJ25-- 

SET of WINCHESTER SOFTWARE UTILITIES $«»— 

■ hipping* h»ndUng ?.00lUS.CT»»d«)- 4.00 f owr— > ) 




TERMS: -VISA- MONEY ORDER - 

Tel.: {$14) 737-87B7 



interfacing technologies cor p. 

P.O. 8oi 57&, Snowdon, 4890 Bourret Ave. Montreal. Que., H3X 3T7 






• •»*. tr T«Hi|4t 



QMM2 256K 

DYNAMIC MEMORY 

A 2Mhz dynamic memory board compatible 
with SWTPC and other systems, Socketed, 
assembled, tested, gold connectors, 1 yr. 
warranty. $795.00 

OS-9™ SOFTWARE 

UTILITIES-A for OS-9 level II includes a fast 
function PRINTERR r disassembler memory 
and process dumps, file split and others. 
$75.00 

FILTER KIT #1 Contains 11 utilities used as 
filters to allow wild card directory lists, 
copies, deletes, moves, lists, pagination, etc. 
$40.00 

Terms: Prepaid, COP, VISA r MASTERCARD, 
Specify 5V4 * or 6* diskette for software. 
Send SASE for more info. 

D.P. Johnson (503) 244-6152 

7655 S.W, Cedaccrest St., Portland, OR 97223 

OS-9 is a trademark of Microware and Motorola Inc, 
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Call: 215-337-3138 
Telex: 510-660-3999 
Write: The JBM Group, Inc. 
332 West Church Road 
King of Prussia, PA 
19406 

The OS- 9* Solution Team 

♦Trademark of Micro ware and Motorola 



68 MKBO JOWNAL FVCERNG cm 0191 

Olsk #1: FILESORT, MINICAT, MINICOPY. MINIFMS, 

••LIFETIME, *T06TRY J ••FOOOllST, ""DIET. 
Disk #2: OISKEOIT w/ Inst. & fixes, PRIME, TW40D, 

••SNOOPY, ••FOOTBALL, ^tEXPAWN, "LIFETIME. 
Olsk #3: CBUG09, SEC1, SEC2, FIND, TABLE2, INTEXT. 

OISK-EXP, ^OISKSAVE. 
Olsk #4; MAILING PROGRAM, "FINOOAT, *CHANGE, 

•TESTOISK. 
Olsk #*; *DISKFIX 1, •DISKFIX 2, ••LETTER, 

••LOVESIGN, ••BLACXJAK, ••BOWLING. 
Disk #6: "PuftOMSE ORDER, IM)EX (Olsk file Indx). 
OTsk #7; Linking Loader & RLOAO, Horkness 
Disk #0: CRTSET, Lenpher (May '82) 
Disk #9: OATECOPY, DISKFIX9 (Aug '82) 

MOTE: All are as published or received by 68 
Micro Journal, soma have fixes and patches. 

This Is a reader service only) No Warranty Is 
otter*J or Implied, they are as received and are 
for reader convenience ONLY. Also 6800 and 6809 
programs are mixed, as each Is fairly simple 
(mostly) to convert to the other. 

PRICE: 8- DIsK 119.95 - 5" OlsH $17.95 

68 MICRO JOURNAL 

POB 794 

Hlxson, TN 37343 

615-842-4600 

• Indicates 6800, ■■ Indicates BASIC SW1FC or 
TSC - 6809 no Indicator. 

MASTER CARD - VISA accepted - Foreign add 
sufficient postage surface or alrll 



WCER90N CCirUTCR OWSULTAKTS 

I 

Associates 



Ron Anderson, respected author and columnist 
for 66 MICRO JOURNAL announces the Anderson 
Computer Consultants & Associates, a con- 
sultlng firm dealing primarily In 68XXCX) 
software design. Our wide experience In 
designing 6609 based control systems for 
machine tools Is now available on a 
consultation basis. 

Our experience Includes programming 
mechlne control functions, signal analysis, 
multi-axis servo control (CNC) and general 
software design and development. We have 
extensive experience In Instrumentation and 
enelysls of specialized software* Vto support 
all popular languages pertaining to the 6609 
and other 66XX(X> processors* 

If you ere a manufacturer of a control or 
measuring package that you believe could 
benefit from efficient software, write or call 
Ron Anderson 4 The fact that any calculation 
you can do with pencil and paper, can be done 
much better with a microcomputer « Me will be 
happy to review your problem and offer a 
modern, state-of-the-art microcomputer 
solution. We can do the entire Job or work 
with your software or hardware engineers. 

AndersOT Ocaj>ut*r Consultants & Associates 

3540 Stirtrldge toart 

Ann Arbor, Ml 48105 
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SORTC** forOS9* 

THE ONE AND ONLY 



LIKE THIS: 



NOT LIKE THIS 




MASTER 
FILE 



i— « 1 I- « " 

SELECT I SORT 




BOLDLY GOING WHERE NO SORT 
HAS GONE BEFORE 



SORTC is a high speed, full-record com- 
pounding disk sort, which gives microcom- 
puter users mainframe capabilities. It has been 
specifically designed to sort data efficiently 
while offering the user great flexibility in 
designing sort programs. It is written in 
BAS1C09' for use under 059. 

COMPOUNDING FUNCTION 
SORTC has the capability of summing user- 
specified numeric fields on equality of keys. 
This allows significant savings in memory, 
disk space, and program development time. A 
reduction in the number of disk accesses re- 
quired when compared to other sorts is in- 
herent in the design of SORTC. 

DISK BASED 

Specifically designed to sort large volumes of 
data, SORTC imposes no size restrictions on 
the amount of data to be sorted. It also places 
no limits on the number of sort keys which can 
be used or the order in which the keys are sort- 
ed. Furthermore, the sort procedure can be 
performed as many times as necessary within 
the same program. This feature allows the pro 
grammer to take advantage of any existing 
data bias, and possibly even reduce the size of 
the sort key. 



ADVANCED DESIGN 

While most disk sorts are partially based upon 
the Fibonacci series, SORTC is not . SORTC is 
a generation ahead of the normal sorts based 
upon the Tib series". Its unique algorithm is 
automatically optimized at run time for a re- 
duction in workspace, reduced * of disk acc- 
esses and shorter run times. Designed to be as 
"crash proof as possible, the sort procedure 
will not abort if it is accidentally asked to sort 
zero items. 

EASY TO USE 

It is not difficult to design a program which 
will use JBM's SORTC. Since SORTC is a 
subroutine, the user may write any procedure 
he or she wants to format the data for sorting 
and then to process the sorted data. The sorted 
data need not be written back to disk, but in- 
stead is immediately available. The sort code is 
automatically inserted into the source proced- 
ure by a simple Sort Generator 



O 



JBM'S MIDWARE 



*0$9, BASJC09 art r«9rstcrcd trademarks o* Microwarc 
Corporation 

••Um the same algorithm as JBM's SORTC for Digital 
Equipment CorP RSTS Svstems 



ORDERING INFORMATION 

SORTC, from JBM's MIDWARE line of 
quality software, is available on either nve 
and one-quarter or eight inch diskettes for 
a price of 5150.00. All of JBM's software 
packages come complete with comprehen- 
sive user's manuals. 

For more information, or to place an order. 

contact: 

DEFT. FSEA (tie 

The JBM Group. Inc, 

332 West Church Road 

King of Prussia, PA 19406 

TEL: 215337-3138 

TWX: 510-660-3999 

VISA and MA5TERCHARGE accepted. 
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FREE 
CATALOG 



FRANK 

HOOQ 

LABORATORY 



'TOW!* * »U*f ■ HI » r?0****nST ■ *V RACISM HI -UOl 




POWERFUL CCK.OR GraPmi S 
Umi Ihe new TMS9918A Video 0i» 
play procetOr Hrg* reaOluliOn 25$ k 
192 pixel dtiplay wiih 15 cokxe 18K 
Byleaol onboard RAM doe* not reduce 
umi memory 32 graofwc imagea can 
be individually moved wrih urnpie <-t 
command* *0* *moo«h ammaiion 
Ex( not Video rnpui eeowt eublithng 
NTSC compome video ouioot 

sound effects and musk: 

• Three AY3-8910 Program mettle 
Sound General ri 

• Nino lunuiianijoiJi vo*Ce» 

e Three independent noue tourcei 

• Onooerd sleteo amphher drive* (wo 
Bonm •e*a*»rt 

KWhTTltiM IS) CAFAttLlTifcS 

• EtgM analog knpv/la wffn 6 bit reao- 
KHtOfl 

e Svppooe louv loyaticM w«th pu«Nw? 

lo« iwitche* 
e EtgM bii parallel I/O ©o»i 
e Enure gnu maoa irilo 258 byles of 

memory 



PBS&UC 



T{ RMINUS DESIGN INC , in coniunc- 
don wrih Microware System t Corpora 
tio*v >i proud io announce FBASiC an 
enhancement oi Microwarei 6600/ 
BASIC Their 1e*i compiled BASIC haa 
bwn adapted for 6609 user* **th added 
video and sound features tor ARCADE 
50 unt>i F BASIC ■• a ifk*e compter 
i hi i produces optimised machine lan- 
guage modules wheh a iff ROMable and 
requ»e no Run Time package r BASIC 
iequne* teas memory overhead And 
runt hundreds O* limem Jailer Than 
BASIC interpreter* i| supports nan 
dard BASIC instruction including 
Sirmgiuncf ions DiSA I/O and last <nleg*r 
anirimehc wtth mutttpie prc^wn capa- 
bility G r* phic t verb* and tunc I ioni I uiiy 
supporl the Arcade SO 



ARCADE 50 assembled and I Piled 
Video and Audio connecto* set 
4 Joystick connecto* sol 
2 Radio Shack J0y*hcM 



AJ BASIC 10*6800 

FBASIC lor 6809 

FBASIC twllft ARCADE 501 

ARCADE SO RGB 

L A BViDE Cm Motorola ExORbuti 

NEW MV09 66G9 Processor Board 

266R Oynamic Memory Board 

256K Oynam* Memory Boerd<w/64K| 

64 K D nemtc Memory Board 



«?500 

1500 

1500 

24 00 

1200 

11000 

11000 

7500 

37500 

37500 

22500 

79500 

39500 

29500 



II DMt t %>>♦ M*.* \u 



TERMINUS DESIGN INC 
16 SCARBROUCH ROAD 
ELLENWOOD, GA 30049 

,oi. (404) 474-4866 




RDBDT-I 

by 

ANALOG MICRO SYSTEMS 
5660 Valmont Road 
Boulder. Co. 80301 

Includes SS-30 card with 
power and 6 channel servo 
controller, Robot-1 with 
cables and software. 
Order Robot-Is $395. ea. 



Interface for 
and switches 
Order ADS8 



4 joysticks 
$195. ea. 



Free Catalog 
Up to 8 robot arms with 8 SS-30 servo control cards may be programmed 
to operate interactively and simultaneously using the AMS multi robot 
arm software. All movement sequences may be saved on disc and retrieved 
later for repeating the multi interactive robot arm movement sequences. 
Source code is provided with all software to enhance the ease of 
research and experimentation in the field of robotics. Phone (303)444-6809 
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CORN 



* 



T M ftfl B BB*BOC 



-TOT3i'imiir^ ■ 



KOOVLM - BARE CARDS 
Sttcfcabl* Modal** 



IIT3 * ASSEMBLED * TESTED 
EIT A*T 



20 &•* POVEK 80PPLT w/f to 
•/Disk protaot r*lmj 

DISK CABINET v/rafa. % oablaa 
lui DIIVSS 

noraift boaid, b ea-soc, a ss-aoc 

UMI button 



350.00 400.00 
200.00 230,00 
225.00 325.00 



It** 



Bare 



KIT 



AH 



IT3 



UTORIUPT TIMI8 

1« 10, 100 par aac. 19.63 
FB4 - IBTILLIOEWr POET BOFFSB 

Blafla board coayut. 39.99 
DPIA - Dual PIA parallal port, 

4 buf farad 2/0* 24.95 

ZADB - Ixtaada* Atfdraaaiac 

B APP ciP. PIA port 26.95 
MBB - MOTOR BOABD 83-SOc 

a/BAOD Ban. 64.65 

P1B8 - 16BX PBOM DISK 

21. 2764 EPBOUa 39.95 

FOBS - Fimvara davalopawat 

2. BE blocka 39.65 
XBPB - 2764 PRO* boraar adapt. 

for 2716 BURMB 
CHERKT larboard w/Cablaat 

96 ka? capucltlva 
T&XAA 12", IB BhB BOfflTOR ORBKR 
AMBER 
4 BODGLB CAB I WET * uaflalabad 
POfER BOPPLT v/dlak protact 



146.65 

156.95 



130.00 
250.00 



[♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦ m l 

Color Computer 



BOHOL1HE - 20 Mbs Uoaocbroa* 

▼ldao drlvar 
COO POBT 808 w/powar supply 

5 33-30, 2 Cart 
POVRR BOX 6 avltcbad ootlata 

traaaiaat auppraaaion 
RS'232 3***ltcbad porta 

for abova 



15.00 20.00 

186.95 196.65 

26.65 36.65 

ADD +20.00 +25.00 



Write for FREE Catalog 

ADD SJ.00 S£H PER ORDER 
WIS. ADD St SALES TAX 






11931 W. Bluemound Road 
MILWAUKEE. WIS. 53226 
m (414) 257-0300 
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THOMAS INSTRUMENTATION 



HARDWARE 



ASSEM & TEST BARE CARD SOFTWARE 



CPU-5 

S-R/R w/o memory chips 
S-R/R with 48K 
SP-1 

6802 SUPER CPU 
VIDEO RAM 
PARALLEL I/O 
SS-50/50C EXTENDER 
SS-30 EXTENDER 
SS-50 WIRE WRAP 
SS-30 WIRE WRAP 
SS-30 BACKPLANE 8POS . 
SS-50 BACKPLANE 4,8, 12, 
& 16 @ S5.00/SLOT 

COMPONENTS 



GOLD MALE MOLEX $1.60 GOLD FEMALE MOLEX $1,60 
TIN MALE MOLEX $ .40 TIN FEMALE MOLEX $ .50 
146805E2P $20.00 

HASTEKCAR0. VISA. AND C.O.O. ACCEPTCO. PLCASC ALLOW 3 WEEKS 
TOR CHECKS TU CLEAR. CONT. USA ADO S3. 00 SHIPPING, CANADA 
S6.00. rOREICN 512.00. ftj RESIDENTS ADD 61 SALES TAX 
TLE* ind UOiTLEX ARE TRADEMARKS Of TECHNICAL SYSTEMS CONSULTANTS 



$299.00 
$120.00 
$399.00 
$195.00 
$235.00 
$195.00 
$139.00 
$ 35.00 
$ 25.00 

NA 

NA 

NA 

NA 



$49 .00 
$49.00 
$49.00 
$49.00 
$59.00 
$49.00 
$49.00 

NA 

NA 
$39.00 
$20.00 
$39.00 

NA 



VDISK 

Use extended memory 
as a fast disk drive 
6809 source & obj $149 
6809 object $ 99 



00 
00 



OUTSIDE MODEM PROGRAM 

includes* source 
UniFL^X Km $100 .00 

FLEX t,n 6800 or 6809 $ 50.00 

CROSS ASSEMBLER 

For 6800, 6801, 6805 
Runs on 6809 FLEX*" 

$150.00 

THOMAS INSTRUMENTATION 
168 EIGHTH STREET 
AVALON, N.J. 08202 
(609) 967-4280 
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Bizpack 

welcomes you to 

Business planning, budgeting, and 
forecasting. One of the most 
useful programs you can find on 
any computer, any size, any price. 
More than just a spread sheet. 
Flex and TSC Xbasic required. 
With source, License $250 
(subject to non-disclosure 
agreement). Standard Bizpack 
License $135. 

Virginia Company 

P.O. Box 2167 Owtrtiamfcur*. VWpWs 24073 • 1703 ) 382-4139 



FIRST CLASS 

IKTEUJCOM 

JNTOJUgBrrl COMunkartton* Program 

tfTELUCOM provide* you with the capability of Intelligent 
confer to computer communication* from both a termin- 
al emulation and file transfer standpoint. INTELUCOM sup- 
port* several file transfer protocols that facilitate the transfer 
of both binary and ASCII data. Since tffTBLUCOM is menu 
4riv, it is a breeze to use and understand. With INTELLK 
COM you will be able to communicate with the various data 
and timesharing service* such as The Source and Com- 
puServe. Additionally, since INTELUCOM eupport* the 
protocol used by virtually afl remote CP1UI systems around 
the world, all users can immediately begin to lake advantage 
of the wealth of public domain sotware available on these 
systems, Current, or potential, users of CompuServe can 
transmfl and racefve both binary and ASCII data with full 
enor detection and rw37very. The checksum protocols allow 
for the vferifcefons of data blocks transferred (assuming 
appropriate suppott on the host end). This feature will be of 
great value in those applications where data integrity is para- 
mount. JrYTELUCOM'a docume ntat i o n includes a detailed 
description of all protocols used along with rnacNne rBadabte 
examples of host pseudo code. A telephone directory and 
dialing facility compatible with Hayes Sniartrnoderna is sup- 
ported. 

r*o»Ot«crPl£XVv*t*i*mJ&.^KjOOCOO 
JOTO 4SSOOATDC& 1CM L*»v> Or. a******* CT 
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GIMIX STATE OF THE ART 6809 SYSTEMS FOR THE SERIOUS USER. 




GIMIX has 19MB pr high performance 
47MB Winchester Drive Systems and/or 
Floppy Disk Drive Systems. 



Jbr the ultimate in peiformance, the Unique GMX 6809 CPUIE r 
using either OS-9-GMXin or UniFLEX GMXID (available shortly), 
gives protection to the system and other users from crashes 
caused by defective user programs, e.g. Duiing program 
development, a programmer who crashes goes back to the 
shell or the debugger while the other users are not even 
aware anything occurred. 



Ihe intelligent serial I/O processor boards signifi 
cantly reduce system overhead by handling iou- 

tine I/O func- 
tions, there- 
by freeing up 
the host CPU for 
running user 
programs. This 
speeds up system per- 
formance and allows 
multiple terminals to be 
used at 19. ZK baud. 
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Gimix 




For the user who appreciates the need for a 
bus structured system using STATIC RAM 
and powered by a feiro resonant constant 
voltage transformer, 

GIMDC has single user systems that can run 
both FLEX and OS-9 or Muhi user systems for 
use with UniFLEX or OS-9- 

GIMIX versions of OS9 and UniFLEX in- 
clude maintenance and suppoit by Micro- 
ware (90 days) and TSC (1 yearX Mainte- 
nance and suppoit after this period 
are available at extra 
cost. 

{NOTE: this support and 
maintenance is only 
for use with approved 
GIMDC hardware) 



/ GIMDC 6809 systems 
/ support five predominant 
/ operating systems 

OS-9 GMX II1 V 

OS-9 GMX II, 

UniFLEX, 

OS-9 GMX I, 

FLEX 

and a wide variety of languages 
and development software 

Whatever your application software 
development, instrumentation, process 
control, educational scientific or business, 
whether you need single or multi-user 
capabilities. GIMDC has hardware and the 
operating systems to get the job done 
reliably 

Please phone or wnte if you need further information 
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The Original FLEX ™ for Color Computers 



* Upgrade to 64K 

* RS to FLEX. FLEX lo RS Tile transfer ability 

* Create your own character set 

' Automatic recognition ol single or double density and single or 
dooWed sited 

* All features available for either single or multiple drive systems 

* Sellable Disk Drive Seek Rates 

* Faster High Resolution Video Display with S different formats 

* Save RS Basic from RAM to Disk 

* Move RS Basic 10 RAM 

- Load end save function on FLEX disk 

* 24 Support Commands 12 wth Source Text 
' Externa* Terminal Program 

QAT^O>9> to* everything you need to nafce your TBS-60C Q?lor Q>^»itffr 
WORK for TOUf ttan part* And Placee to F\ill Reedy lb Um Syetens. W1A- 
OOHP d«aign», telle, •ecvlc**, end Sl/HOTTS Cfani?ofcer SYSTO4S, not Jtiet 
&rft*»ce. CALL f^T^-OOMP TOCAY to weke your Onijoter WOt* FDR YUCl 

ayetex RviuLneMftte 

ftOO Sp«?Ul OXVral ^r«ior» ♦ Editor fc Maentoler (vrfvlch ncmwlly sell 
(or $S0.B0 ea.) $250.00 

M*tft(«0 FLDO Cowtnlon SOut. tor the PS Disk CmtrolUr 
**»en purcheeed with Special General fLBO Sye- $ 49-95 

vhen fur£hae*3 without tha Central PLDG Sye. $ 59,95 



DISK EfUW PttJCKB, #tc, 

-ft*M nci^i todate the Radio ©«c* at*k toitroller. Die* Brtwa vith 
Power Ripply and cabinet, and tttsk Driva Qibia; 

WK II - 1 Sir«9la Sided. CtH±>le OBnsity Sye. $389.95 

PNt #2 - 2 Bin§lm Sided, CDvt>ie Danaity Sye. $675.95 

PMC 13 - 1 Dwl>le Sided, CoxUle Deneity sye. $569.95 

WM-2 rjo*A>la Sldad, D*A>le Density sye. $919*95 

BMC iS - 2 O** -minltna Dotfcle Sldad, ttntjle Oenaity Bya. $699.95 

PMC H - 2 Tandcn *mintine Single Sided, t»*>le fenaity Sye. $599.95 



epscn ioc^ae 
epeca mx-im 
bpson Mx-ee 

EP9CN PX-8C 



$375.80 
$725,00 
$395.00 

$599,00 



Color Cbafutar vith 64K RAM are! BCT. BASIC 



$399.95 



KX-Sarlea $119.95 

RX-#X-SerUa $ 99.95 

Spactr\w HK-Saria* $ 54.95 

$ 67.95 



64K ttMiln Shack CHXK CZXFVTS^ Radio Shack CC1XF DISK CWTOiiR, a 
Diftk Drive Sywt^n, Social Onerai varaion of PUX9, P-HKTe(RS}, and a 
Box of 10 p>*>le Danalty Diatcatua. a CXKPVCTt ready to r\ai STCTO1 on 
your Color TV set. 

$JB99.95 

64* Radio Shack CUXJt COaXTTCC Radio Shack COUP DISK COmctLa. a 
Diak Drive Svetan, and a Box of 10 Otaiile Oanaity Diskettes, a commas, 
ready to c\»i SV^hm on your Oalor TV Set . 
1799.95 



Radio Shack Mak Controller 

1 Single Sided. ttxt>le Danalty Diak Drive Tendon 

1 Double Sided, 0*£>le Danalty Diak Drive Quae 

1 Qtaas ThU>llne Double Sldad, D>ft>le Danalty 

1 Thnfan 40 Track 8SDD with Cabinet and Po^r Sta^ply 

Single Drive Cabinet vith Power »«»ly 

0o£>le Drive Cabinet vith Pbwer »4T>ly 



$169,95 
$229.95 
$319.95 
$249.95 
$259.95 
$ 79.95 
$109.95 



Soft Sector Diaka 
Single Sided Single Danaity 
Single Sided Double Deneity 
ODrtle Sided On±iXm Uaneity 
Plaetlc 1 



MEMOREX VERBATIM 



$2.4 
$2-4 



Soft aactor Diaka 
Single Sided Single Oenaity 
Single Sided ODUble Density 
0>±>le Sldad Dbuble Danalty 
Plaetlc Library so* 



$2.7Sea 
$2.75aa 
$4.92aa 

$2.0Bea 



$3.75ea 
S4.10aa 
$4.75ea 
S5.0Q»a 



Single Drive Diak Cable for RS Qjrtxoller $ 19.95 

Oxfele Drive Diak Cable for » Controller $ 24.95 

Micro Tech. Praia, tnc. LOVO* CASS KM Maf*er $ 74.95 

Radio Shack BASIC version l.I RCM est 1 .2 ROM $ 34.95 

Radio Sh«ck Bitanled Baaic ROM $ 74.95 

Radio Shack Dlek Basic ROM 1.1 $ 29.95 
Screen Clean - Clear a Up Video Dletortion <y> \90vir Cblbr Qxputer $ 39.95 

Set of Eight 64X RAH Chip* w Mod lnatructlona $ 49.95 



For Ordering Call TOLL FREE 1 800 338 6800 



LAST OF PRODUCTION!!! 

!! LIMITED QUANTITY !! 

SWTPC 8212 & 821 2(W) 
Intelligent Terminals 

New & Demo Models 

At Discount Prices 

Remaining Supply of 
SWTPC 8212 CRT Terminals 



EM-82 Video 
Terminal 

Emulates the 8200 Series from SWTPC 



'HEX « • moot** a* Tmocii SyMnw CWiuimi 



DATA-COMP 

P.O. 0Qi 1U HtXSONf TN 37343 
1-61 $-642-4601 




Data-Comp — South East Media & 60 Micro Journal Are Divisions of CP1 



68 Micro Journal 

5900 Casttrtlf* Smith Rd 

HlxWW.TN 37343 



Second Class Postage Paid 
At CbaManooga, TN 
ISSN 0194-5025 
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Hazelwood Computer Systems presents a pair of advanced 
memories for S-50 or S-64 systems. 




Order: 0W- 2 56 






HAZELWOOD COMPUTER SYSTEMS 

907 East Terra, O Fallon, MO 63366, 314 28M055 




^95 



7 VEL/X 



